特定のページの印刷プレビューを表示する(PrintOutメソッド)|Excel VBA |
VBAを利用して印刷プレビューを表示するには、通常はサンプル1のようにPrintPreviewメソッドを利用します。
Sub Sample1()
ActiveSheet.PrintPreview
End Sub
しかし、PrintPreviewメソッドでは、プレビューしたいページ数を指定することができません。特定のページの印刷プレビューを表示するには、PrintOutメソッドの引数Fromに開始ページを、引数Toに終了ページを、引数PreviewにTrueを指定します。
次のサンプル2は、PrintOutメソッドを利用して、アクティブシートの2ページ目から3ページまでの印刷プレビューを表示します。
Sub Sample2()
ActiveSheet.PrintOut From:=2, To:=3, Preview:=True
End Sub