EXCEL VBA:控制图表之获取图表个数、颜色、添加新图表等代码

2013-06-17 21:51 阅读 827 次 评论关闭

如下的文章内容,与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"

版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:EXCEL VBA:控制图表之获取图表个数、颜色、添加新图表等代码 | 猎微网

评论已关闭!