簡易印刷（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 |
実行結果
関連記事
-
-
印刷設定（ヘッダー／フッター）書式コード・VBAコード
印刷設定（ヘッダー／フッター）書式コード・VBAコード ヘッダーおよびフッター（ …
-
-
ブックの表示・非表示（Visible プロパティ）
ブック表示・非表示（Visible プロパティ） ブック（ウィンドウ）が表示され …
-
-
セルのコメントを印刷（PageSetup.PrintComments プロパティ）
PageSetup.PrintComments プロパティ PageSetup. …
-
-
ブックを保存する（Save メソッド）
ブックを保存する（Save メソッド） 既存のブックを上書き保存するには、Sav …
-
-
印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
シート見出しの色を設定（Tab プロパティ）
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）
印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …
-
-
ワークシートをファイルに保存する（SaveAs メソッド）
SaveAs メソッド ワークシートを名前を付けてファイルに保存します。Work …
-
-
ウィンドウを整列（Windows.Arrange メソッド）
ウィンドウを整列（Windows.Arrange メソッド） Windows コ …
-
-
アクティブプリンタを変更（ActivePrinter プロパティ）
ActivePrinter プロパティ ActivePrinter プロパティを …