VBA入門
印刷プレビュー(PrintPreview)

ExcelマクロVBAの基本と応用、エクセルVBAの初級・初心者向け解説
公開日:2013年5月以前 最終更新日:2021-10-02

第72回.印刷プレビュー(PrintPreview)


VBAで印刷プレビューを表示するには、
・PrintPreviewメソッドを使用する
・PrintOutメソッドを使用する
この2通りの方法があります。


PrintPreviewメソッドとPrintOutメソッドが使える対象オブジェクトは複数あります。
ブック、シート、セル、それぞれにPrintPreviewメソッドとPrintOutメソッドが存在します。


PrintPreviewメソッド

式.PrintPreview EnableChanges

式.には、
Windowオブジェクト
Workbookオブジェクト
Worksheetオブジェクト
Rangeオブジェクト
Chartオブジェクト
Sheetsコレクション
Worksheetsコレクション
Chartsコレクション


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

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

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

非表示シートに対してPrintPreviewメソッドを使用した場合はエラーとなります。

使用例.
Activeworkbook.PrintPreview
アクティブブックのアクティブシートが印刷プレビューされます。
PrintOutの場合は、全シートが印刷されますが、
PrintPreviewでは、アクティブシートしかプレビューされませんので注意して下さい。

Worksheets(1).PrintPreview EnableChanges:=False
アクティブブックの1番目のシートが印刷プレビューされます。
印刷設定のボタンは使用出来なくしています。

Range("B2:D30").PrintPreview
アクティブブックのアクティブシートのB2セル~D30セルが印刷プレビューされます。


PrintOutメソッドの使用

前回の、PrintOutメソッドで、
・PrintOutメソッド ・PrintOutメソッドの使用例 ・印刷時にプリンターを選択したい場合 ・印刷総ページ数の取得 ・間違った印刷を大量に行わないわない為には
引数PreviewにTrueを指定することで、印刷プレビューされます。

Preview:=True
これで、印刷プレビューされます。

ブックの全シートの印刷プレビュー
ActiveWorkbook.PrintOut Preview:=True
全シートのプレビューには、上記のPrintOutメソッドを使って下さい。


PrintPreviewメソッドとPrintOutメソッドの使い分け

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

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




同じテーマ「マクロVBA入門」の記事

第69回.シートの非表示(Visible,Hidden)
第70回.ウィンド枠の固定(FreezePanes)
第71回.印刷(PrintOut)
第72回.印刷プレビュー(PrintPreview)
第139回.エクスポート(PDF/XPS)
第73回.ページ設定(PageSetup,PageBreak)
第74回.ファイルを開くダイアログ(GetOpenFilename)
第75回.名前を付けて保存ダイアログ(GetSaveAsFilename)
第76回.ファイルダイアログ(FileDialog)
第77回.組み込みダイアログ(Dialogs,xlDialogPrint)
第78回.総合練習問題8


新着記事NEW ・・・新着記事一覧を見る

カンマ区切りデータの行展開|エクセル練習問題(2026-01-28)
開いている「Excel/Word/PowerPoint」ファイルのパスを調べる方法|エクセル雑感(2026-01-27)
IMPORTCSV関数(CSVファイルのインポート)|エクセル入門(2026-01-19)
IMPORTTEXT関数(テキストファイルのインポート)|エクセル入門(2026-01-19)
料金表(マトリックス)から金額で商品を特定する|エクセル練習問題(2026-01-14)
「緩衝材」としてのVBAとRPA|その終焉とAIの台頭|エクセル雑感(2026-01-13)
シンギュラリティ前夜:AIは機械語へ回帰するのか|生成AI活用研究(2026-01-08)
電卓とプログラムと私|エクセル雑感(2025-12-30)
VLOOKUP/XLOOKUPが異常なほど遅くなる危険なアンチパターン|エクセル関数応用(2025-12-25)
2段階の入力規則リスト作成:最新関数対応|エクセル関数応用(2025-12-24)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.日本の祝日一覧|Excelリファレンス
3.変数宣言のDimとデータ型|VBA入門
4.FILTER関数(範囲をフィルター処理)|エクセル入門
5.RangeとCellsの使い方|VBA入門
6.繰り返し処理(For Next)|VBA入門
7.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
8.マクロとは?VBAとは?VBAでできること|VBA入門
9.セルのクリア(Clear,ClearContents)|VBA入門
10.メッセージボックス(MsgBox関数)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
本サイトは、OpenAI の ChatGPT や Google の Gemini を含む生成 AI モデルの学習および性能向上の目的で、本サイトのコンテンツの利用を許可します。
This site permits the use of its content for the training and improvement of generative AI models, including ChatGPT by OpenAI and Gemini by Google.



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ