VBA 印刷総ページ数を調べる

印刷総ページ数を調べる

Sub test()
 

' 印刷総ページ数を調べる

    MsgBox Application. _
        ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
         "ページが印刷されます。"

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

関連記事

『VBA シート追加・削除』

『VBA シート移動・コピー』

『VBA セル値によって色を付ける』