印刷プレビュー（PrintPreview）

最終更新日：2018-01-30

第72回.印刷プレビュー（PrintPreview）

VBAで印刷プレビューを表示するには、

PrintPreviewメソッドを使用する方法とと、PrintOutメソッドを使用する方法があります。

PrintPreviewメソッドとPrintOutメソッドが使える対象オブジェクトは複数あります。

ブック、シート、セル、それぞれにPrintPreviewメソッドとPrintOutメソッドが存在します。

PrintPreviewメソッド

式.PrintPreview EnableChanges

式.には、

Windowオブジェクト
Workbookオブジェクト
Worksheetオブジェクト
Rangeオブジェクト
Chartオブジェクト
Sheetsコレクション
Worksheetsコレクション
Chartsコレクション

これらのオブジェクトに、PrintPreviewメソッドとPrintOutメソッドがあります。

EnableChanges

余白など、印刷プレビューで設定可能なページ設定オプションをユーザーが変更できるかどうかを示すブール型 (Boolean) の値。
省略時の既定値はTrueです。

EnableChanges:=False

にすることで、プレビュー画面では、印刷設定のボタンが使用不可となります。

使用例．

Activeworkbook.PrintPreview

アクティブブックのアクティブシートが印刷プレビューされます。

PrintOutの場合は、全シートが印刷されますが、

PrintPreviewでは、アクティブシートしかプレビューされませんので注意して下さい。

Worksheets(1).PrintPreview EnableChanges:=False

アクティブブックの1番目のシートが印刷プレビューされます。

印刷設定のボタンは使用出来なくしています。

Range("B2:D30").PrintPreview

アクティブブックのアクティブシートのB2セル～D30セルが印刷プレビューされます。

PrintOutメソッドの使用

前回の、PrintOutメソッドで、

引数PreviewにTrueを指定することで、印刷プレビューされます。

Preview:=True

これで、印刷プレビューされます。

ブックの全シートの印刷プレビュー

ActiveWorkbook.PrintOut Preview:=True

全シートのプレビューには、上記のPrintOutメソッドを使って下さい。

PrintPreviewメソッドとPrintOutメソッドのどちらを使った方が良いかという事になりますが、
通常は、PrintOutメソッドを使えば良いでしょう。
引数の変更だけで、印刷と印刷プレビューを切り替えられます。

PrintPreviewメソッドを使う最大のメリットは、
EnableChanges:=False
これで、余白などページ設定をユーザーにさせないようにできるという事です。
これが必要ない場合は、PrintOutメソッドを使えば良いでしょう。