簡易印刷（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 |
実行結果
関連記事
-
-
ユーザー設定のビュー（CustomView オブジェクト）
ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …
-
-
印刷設定を高速化（PrintCommunication プロパティ）
PrintCommunication プロパティ PrintCommunicat …
-
-
ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウの分割と解除 ウィンドウ（ワークシート画面）を分割するには、Split …
-
-
ブックのコピーを保存（SaveCopyAs メソッド）
SaveCopyAs メソッド SaveCopyAs メソッド は、現在開いてい …
-
-
ブックのパスを取得（FullName プロパティ,Path プロパティ）
FullName プロパティ・Path プロパティ ブックのパス（保存場所）を調 …
-
-
ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
Excel を全画面表示（DisplayFullScreen プロパティ）
DisplayFullScreen プロパティ DisplayFullScree …
-
-
印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）
PageSetup.PrintTitleRows プロパティ PageSetup …
-
-
印刷設定（ヘッダー／フッター）書式コード・VBAコード
印刷設定（ヘッダー／フッター）書式コード・VBAコード ヘッダーおよびフッター（ …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …