Excel VBAでワークシートの印刷プレビューを表示する方法を記録します。
ワークシートの印刷プレビューは「PrintPreview」メソッドを使います。
< スポンサーリンク >
「PrintPreview」メソッド構文
WorkSheetオブジェクト.PrintPreview
VBAで印刷プレビューする
シートは次のようになっているとします。
Sheet1
Sheet2
アクティブなシートの印刷プレビュー
アクティブなシートを印刷プレビューで表示する場合は次のように書きます。
Sub test()
ActiveSheet.PrintPreview
End Sub
書き込んだVBAを実行するとアクティブなシートの印刷プレビューが表示されます。
シートを指定して印刷プレビュー
シートを指定して印刷プレビューで表示する場合は次のように書きます。
Sub test()
Worksheets(“Sheet1”).PrintPreview
End Sub
書き込んだVBAを実行すると指定されたシートの印刷プレビューが表示されます。
2番目のワークシートを指定して印刷プレビュー
2番目のワークシートを指定して印刷プレビューで表示する場合は次のように書きます。
Sub test()
Worksheets(2).PrintPreview
End Sub
書き込んだVBAを実行すると指定されたシートの印刷プレビューが表示されます。
全てのワークシートを印刷プレビュー
全てのワークシートを印刷プレビューで表示する場合は次のように書きます。
Sub test()
Worksheets.PrintPreview
End Sub
書き込んだVBAを実行すると全てのワークシートの印刷プレビューが表示されます。
1ページ目
2ページ目
こんな記事も書いています