簡易印刷（PageSetup.Draft プロパティ）
PageSetup.Draft プロパティ
PageSetup.Draft プロパティに、True を設定すると簡易印刷（罫線、グラフ、図形などグラフィックスを省略して印刷）をすることができます。値の取得および設定が可能で、ブール型（Boolean）の値を使用します。
【書式】
＜取得＞
object.PageSetup.Draft
＜設定＞
object.PageSetup.Draft = boolean
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- boolean ・・・ True を指定した場合、印刷時に簡易印刷を実行します。False の時は、通常の印刷を実行します。
PageSetup.Draft プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Sub Sample_Draft() Dim w As Worksheet Set w = ActiveSheet '簡易印刷を設定 w.PageSetup.Draft = True 'ワークシートをプレビュー表示してから印刷 w.PrintOut preview:=True End Sub |
実行結果
関連記事
-
-
分割したウィンドウの取得（Panes コレクション,Pane オブジェクト）
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
印刷のページ区切り（DisplayPageBreaks プロパティ）
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ）
シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ） …
-
-
印刷設定を高速化（PrintCommunication プロパティ）
PrintCommunication プロパティ PrintCommunicat …
-
-
印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt（ポイント：約 0.03528 cm） …
-
-
ワークシートのコピー・移動（Copy メソッド Move メソッド）
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
ブックを開く（Open メソッド）
ブックを開く（Open メソッド） ブックを開くには、Workbooks コレク …
-
-
印刷設定（フッターに画像を指定）LeftFooterPicture,CenterFooterPicture,RightFooterPicture
フッターに画像を表示するには LeftFooterPicture プロパティ、C …
-
-
選択されているシートを参照する（SelectedSheets プロパティ）
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …
-
-
新規ブック作成（Add メソッド）
新規にワークブックを作成する Workbooks コレクションの Add メソッ …