印刷設定を高速化(PrintCommunication プロパティ)
PrintCommunication プロパティ
PrintCommunication プロパティに、False を指定することで、プリンターとの通信を無効化し、True を指定することで有効化することができます。
印刷の各種設定(PageSetup オブジェクト を使用する動作)は、時間がかかる場合があります。その時は、Excel とプリンタとの通信を一時的に遮断することで、PageSetup オブジェクト の動作を高速化することができます。(※ Excel 2010 以降のバージョンでのみ使用できます。)
<取得>
object.PrintCommunication
<設定>
object.PrintCommunication = boolean
引数・戻り値
- object ・・・ 対象となる Application オブジェクト を指定します。
- boolean ・・・ プリンタとの通信を有効にする場合は、True、無効にするには、False を指定します。
PrintCommunication プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
Sub Sample_PrintCommunication() Dim w As Worksheet Set w = ActiveSheet 'プリンタとの通信を遮断(印刷設定を高速化) Application.PrintCommunication = False '印刷の設定 With w.PageSetup .Zoom = 50 '印刷の拡大縮小率を 50 % に設定 .CenterHorizontally = True '印刷を水平方向中央に設定 End With 'プリンタとの通信を再開 Application.PrintCommunication = True 'プレビュー表示 w.PrintPreview End Sub |
実行結果
関連記事
-
-
ブックを閉じる(Close メソッド)
ブックを閉じる(Close メソッド) Close メソッド で、ブックを閉じる …
-
-
簡易印刷(PageSetup.Draft プロパティ)
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
-
画面の上端・左端を設定(ScrollRow プロパティ、ScrollColumn プロパティ)
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
前後のワークシートを参照する(Previous プロパティ,Next プロパティ)
Previous プロパティ 指定したシートの前(左側)のシートを参照します。 …
-
-
ウィンドウを整列(Windows.Arrange メソッド)
ウィンドウを整列(Windows.Arrange メソッド) Windows コ …
-
-
ブック作成時のシート数の取得・設定(SheetsInNewWorkbook プロパティ)
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
分割したウィンドウの取得(Panes コレクション,Pane オブジェクト)
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
最近使用したファイル(RecentFile オブジェクト,RecentFiles コレクション)
最近使用したファイル(RecentFile オブジェクト,RecentFiles …
-
-
ユーザー設定のドキュメントプロパティ(CustomDocumentProperties プロパティ)
CustomDocumentProperties プロパティ ユーザー設定のドキ …
-
-
印刷実行前に総ページ数を取得(ExecuteExcel4Macro メソッド)
印刷の総ページ数を取得(ExecuteExcel4Macro メソッド) Exc …
