簡易印刷（PageSetup.Draft プロパティ）

サイト管理人

9年前

PageSetup.Draft プロパティ

PageSetup.Draft プロパティに、True を設定すると簡易印刷（罫線、グラフ、図形などグラフィックスを省略して印刷）をすることができます。値の取得および設定が可能で、ブール型（Boolean）の値を使用します。

【書式】

＜取得＞
object.PageSetup.Draft

＜設定＞
object.PageSetup.Draft = boolean

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
boolean ・・・ True を指定した場合、印刷時に簡易印刷を実行します。False の時は、通常の印刷を実行します。

PageSetup.Draft プロパティ使用例

サンプルVBAソース

　
Sub Sample_Draft()

    
    Dim w As Worksheet
    Set w = ActiveSheet
    
    '簡易印刷を設定
    w.PageSetup.Draft = True
    
    'ワークシートをプレビュー表示してから印刷
    w.PrintOut preview:=True


End Sub

Sub Sample_Draft()

Dim w As Worksheet

Set w = ActiveSheet

'簡易印刷を設定

w.PageSetup.Draft = True

'ワークシートをプレビュー表示してから印刷

w.PrintOut preview:=True

End Sub

PageSetup.Draft プロパティ

引数・戻り値

PageSetup.Draft プロパティ 使用例

サンプルVBAソース

実行結果

PageSetup.Draft プロパティ使用例