如下的文章内容，与Excel中的图表有关，为你总结收集了部分常用的VBA操作图表的代码。
①获取当前工作表中图表的个数
ActiveSheet.ChartObjects.Count
②选中当前工作表中图表Chart6
ActiveSheet.ChartObjects("Chart6").Select
ActiveSheet.ChartObjects("Chart1").Activate
③选中当前图表区域
ActiveChart.ChartArea.Select
④更改工作表中图表的图表区的颜色
Worksheets("Sheet1").ChartObjects("Chart9").Chart.ChartArea.Interior.ColorIndex = 6
⑤更改图表工作表中图表区的颜色
Sheets("Chart8").ChartArea.Interior.ColorIndex = 4
⑥添加新的图表工作表
Charts.Add
⑦指定图表数据源并按列排列
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:D5"),PlotBy:=xlColumns
⑧新图表作为新图表工作表
ActiveChart.Location Where:=xlLocationAsNewSheet
⑨将绘图区颜色变为白色
ActiveChart.PlotArea.Interior.ColorIndex = xlNone
⑩将图表1导出到C盘上并命名为My.gif
Worksheets("Sheet1").ChartObjects(1).Chart.Export Filename:="C：My.gif", FilterName:="GIF"