Excel VBAで自動印刷プログラムの作り方を教えて下さい。

質問

あるファイルにある全てのグラフを印刷するマクロを作りたいのですが、
どのようにすれば良いのでしょうか？

Sub Macro2()

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

に何を付け足せば良いのでしょうか？
何卒よろしくお願い致します。

回答No.1

imogasi · ベストアンサー

グラフは
シートに埋め込む方法と
グラフシートにグラフを描かせる方法と
ある。
ー
そのどちらですか、
前者ならグラフをアクチブにしてシートを印刷する（グラフだけ）
シートをアクチブにして（オブジェクトも）印刷する（データなども）
Sub test01()
Worksheets("sheet1").PrintOut
End Sub
ーーー
後者は
Sub test02()
Sheets("Graph1").PrintOut
End Sub
ーーーー
以上だけでは、質問者が他に疑問を持つ点が有るかもしれないが、その場合では、質問を改め、内容を詳細に質問に書いて質問すべきだ。
この質問では大雑把過ぎないですか。