
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ページ目

こんな記事も書いています
