印刷設定を高速化(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 |
実行結果
関連記事
-
-
印刷のページ区切り(DisplayPageBreaks プロパティ)
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
ステータスバーにメッセージを表示(StatusBar プロパティ)
StatusBar プロパティ StatusBar プロパティで、ステータスバー …
-
-
印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ PageS …
-
-
ブックのコピーを保存(SaveCopyAs メソッド)
SaveCopyAs メソッド SaveCopyAs メソッド は、現在開いてい …
-
-
印刷設定(ヘッダー・フッターに画像を設定)Graphic オブジェクト
Graphic オブジェクト Graphic オブジェクト は、ヘッダーおよびフ …
-
-
アクティブプリンタを変更(ActivePrinter プロパティ)
ActivePrinter プロパティ ActivePrinter プロパティを …
-
-
印刷設定(先頭ページのヘッダー・フッターを設定)DifferentFirstPageHeaderFooter, FirstPage
先頭ページに別のヘッダーおよびフッターを設定 先頭ページのヘッダーおよびフッター …
-
-
ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)
ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …
-
-
分割したウィンドウの取得(Panes コレクション,Pane オブジェクト)
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
行列の見出しの表示・非表示(DisplayHeadings プロパティ)
DisplayHeadings プロパティ 行と列の見出しの表示・非表示を設定お …
