投稿日 | : 2004/11/11(Thu) 17:17 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: Excel:印刷時の1ページの行数 |
> Excel2002です(VBA)
>
> 印刷時(プレビュー時)に、設定するプリンタによって、1ページに対する行数が変わります。
> 1ページ当りの行数を取得するためには、どうしたらよろしいでしょうか?
> よろしくお願いいたします。
何の為に行数の取得が必要かは知りませんが、改ページ位置を取得すればいいのでは
他にいい方法があるかは知りませんが、VBAなら一度下記を試して見て下さい。
(印刷範囲が設定されていれば違う方法でも取得できます)
Private Sub CommandButton1_Click()
Worksheets(1).HPageBreaks(1).Location.Select
MsgBox ActiveCell.Address
End Sub
結果よりマイナス1行して下さい。