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

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

グラフの印刷の設定は「PrintObject」プロパティを使います。

< スポンサーリンク >





「PrintObject」プロパティ構文

式.PrintObject

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

 

VBAでグラフを印刷する、しないの設定例

印刷するように設定

アクティブシートの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グラフ印刷

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします