Excel VBA ワークシートを印刷プレビューする-PrintPreview

Excel VBAでワークシートの印刷プレビューを表示する方法を記録します。

ワークシートの印刷プレビューは「PrintPreview」メソッドを使います。

< スポンサーリンク >





「PrintPreview」メソッド構文

WorkSheetオブジェクト.PrintPreview

 

VBAで印刷プレビューする

シートは次のようになっているとします。

Sheet1

Excel印刷プレビュー

Sheet2 

Excel印刷プレビュー

 

アクティブなシートの印刷プレビュー

アクティブなシートを印刷プレビューで表示する場合は次のように書きます。

Sub test()
    ActiveSheet.PrintPreview
End Sub

Excel印刷プレビュー

 

書き込んだVBAを実行するとアクティブなシートの印刷プレビューが表示されます。

Excel印刷プレビュー

 

シートを指定して印刷プレビュー

シートを指定して印刷プレビューで表示する場合は次のように書きます。

Sub test()
    Worksheets(“Sheet1”).PrintPreview
End Sub

Excel印刷プレビュー

 

書き込んだVBAを実行すると指定されたシートの印刷プレビューが表示されます。

Excel印刷プレビュー

 

2番目のワークシートを指定して印刷プレビュー

2番目のワークシートを指定して印刷プレビューで表示する場合は次のように書きます。

Sub test()
    Worksheets(2).PrintPreview
End Sub

Excel印刷プレビュー

 

書き込んだVBAを実行すると指定されたシートの印刷プレビューが表示されます。

Excel印刷プレビュー

 

全てのワークシートを印刷プレビュー

全てのワークシートを印刷プレビューで表示する場合は次のように書きます。

Sub test()
    Worksheets.PrintPreview
End Sub

Excel印刷プレビュー

 

書き込んだVBAを実行すると全てのワークシートの印刷プレビューが表示されます。

1ページ目

Excel印刷プレビュー

2ページ目

Excel印刷プレビュー

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします