【Excel】 グラフの細かい設定 【VBA】

質問

http://okwave.jp/qa/q8339279.html
上記の方法により、
グラフ作成が簡単にできるようになりました。
ありがとうございます。

そして、次に問題がひとつ出てきました。
図のように全部の図を編集したいです。（図は適当なのを作成しました）

１．軸の横線を消す
２．プロットエリアのパターンを白で塗りつぶす

以上のことをしたいです。
できれば、シート内にあるグラフを
まとめて設定できると良いのですが、
そのような方法もありますか？

回答よろしくお願い致します。

回答No.1

keithin · ベストアンサー

基本的には「新しいマクロの記録」で録れるマクロを，そのまま応用するだけです。

が，
＞シート内にあるグラフをまとめて設定できる

という事なので，グラフを作成後にまとめて行う事にします。

sub macro1()
　dim c as chartobject
　on error resume next

　for each c in activesheet.chartobjects
　　c.chart.plotarea.interior.colorindex = xlnone
　　c.chart.axes(xlvalue).hasmajorgridlines = false
　next
end sub

お礼

keithin様、回答ありがとうございました。
お蔭様で思ったとおりのグラフを作成することができました。
ありがとうございました！