Excel VBA ワークシートのグラフを印刷させたり、させないようにする-PrintObject

Excel VBAでワークシートを印刷するときにグラフも一緒に印刷したり、印刷しないようにする設定の記録です。

VBAグラフ印刷

下図はExcel2016です。

 

< スポンサーリンク >

 

構文

式.PrintObject

ドキュメントを印刷するときにオブジェクトを印刷する場合はTrueで、印刷しない場合はFalseのブール型(Boolean)を取得、または設定します。

 

アクティブシートの1つ目のグラフを印刷するように設定する。

Sub test()
    ActiveSheet.ChartObjects(1).PrintObject = True
End Sub

VBAグラフ印刷

VBAグラフ印刷

 

アクティブシートの1つ目のグラフを印刷しないように設定する。

Sub test()
    ActiveSheet.ChartObjects(1).PrintObject = False
End Sub

VBAグラフ印刷

VBAグラフ印刷

 

アクティブシートのすべてのグラフを印刷しないように設定する。

Sub test()
    Dim i As Long

    With ActiveSheet
        For i = 1 To .ChartObjects.Count
            .ChartObjects(i).PrintObject = False
        Next i
    End With
End Sub

VBAグラフ印刷

VBAグラフ印刷

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ