Excel VBA编程使用VBA创建图表.docx

Excel VBA编程 使用VBA创建图表Excel VBA编程 使用VBA创建图表 VBA也是一种宏语言，它可以使用手动方法将较为复杂的宏编写成VBA代码，从而完成某种功能的实现。本节介绍如何使用VBA代码来创建图表。 在VBE窗口中，新建一个模块。然后，打开该模块代码窗口，输入如图17-3所示的创建图表的代码。 输入 图17-3 输入创建图表的代码 其中，输入的创建图表的代码如下： Sub 图表 ' 选择A2至B7单元格区域 Range("A2:B7").Select ' 激活工作区选择添加图表选项 ActiveSheet.Shapes.AddChart.Select ' 激活图表选择工作表1中的A2至B7单元格区域 ActiveChart.SetSourceData Source:=Range("Sheet1!$A$2:$B$7") 选择图表类型为饼图 ActiveChart.ChartType = xlPie End Sub 在上面的代码中，主要包含以下几点内容： l Shapes.Range 属性 该属性返回一个ShapeRange对象，它代表Shapes集合中形状的子集，其语法为：表达式.Range(Index) 其中，表达式为一个代表Shapes对象的变量。参数Index为必选参数，包含该区域中的各单个形状，可以是指定形状索引号的整数、指定形状名称的字符串，也可以是包含整数或字符串的数组。 l Chart.SetSourceData 方法 该方法为指定图表设置源数据区域，其语法为：表达式.SetSourceData(Source, PlotBy) 其中，表达式为一个代表Chart对象的变量。参数Source为必选参数，为包含源数据的区域。参数PlotBy为可选参数，为指定数据绘制方式。 l Chart.ChartType 属性 该属性返回或设置图表类型，其语法为：表达式.ChartType。其中，参数ChartType表示图表类型。 完成代码的编辑之后，用户可以单击VBE窗口中的按钮成一个饼图，如图17-4所示。 ，即可在工作表中生生成图表 图17-4 生成饼图