大家好，今日给大家讲解VBA代码解决方案的第三十四讲，如何利用VBA生成图表的前半部分，在实际工作中我们常用图表来表现数据间的某种相对关系，一般采用手工插入的方式，如下图就是一个我们经常用到的图表：

而使用VBA代码可以在工作表中自动生成图表，这节我们重点讲解一些方法及函数，在下节中我们将结合实例来讲解。。

一：应用于ChartObjects对象的Add方法：创建新的嵌入图表，语法如下：

expression.Add(Left, Top, Width, Height)

参数a)Left、Top是必需的，以磅为单位给出新对象的初始坐标，该坐标是相对于工作表上单元格A1的左上角或图表的左上角的坐标,。

参数b)Width、Height是必需，以磅为单位给出新对象的初始大小。

二：应用于Chart对象的SetSourceData方法:为指定图表设置源数据区域，语法如下：

expression.SetSourceData(Source, PlotBy)

参数a)expression是必需的，该表达式返回一个Chart对象。

参数b)Source是可选的，源数据的区域。

参数c)PlotBy是可选的，指定数据绘制方式，可为xlColumns（系列产生在列）或xlRows（系列产生在行）。

三） 应用于Chart对象的ApplyDataLabels方法:将数据标签应用于图表中的某一数据点、某一数据系列或所有数据系列，语法如下：

expression.ApplyDataLabels(Type, LegendKey, AutoText, HasLeaderLines, ShowSeriesName, ShowCategoryName, ShowValue, ShowPercentage, ShowBubbleSize, Separator)

参数a) e xpression是必需的，该表达式返回一个Chart对象。

b) Type是可选的，要应用的数据标签的类型，可为下面表格所列的XlDataLabelsType 常量之一：

xlDataLabelsShowBubbleSizes 值为6

xlDataLabelsShowLabelAndPercent值为5表示占总数的百分比及数据点所属的分类。仅用于饼图或圆环图。

xlDataLabelsShowPercent值为3表示占总数的百分比。仅用于饼图或圆环图。

xlDataLabelsShowLabel值为4表示数据点所属的分类。

xlDataLabelsShowNone值为-4142表示无数据标签。

xlDataLabelsShowValue值为2表示数据点的值，若未指定本参数，默认使用此设置。

c)LegendKey是可选的，如果该值为True，则显示数据点旁的图例项标示。默认值为False。

d)AutoText是可选的，如果对象根据内容自动生成正确的文字，则该值为True。

e)HasLeaderLines是可选的，如果数据系列具有引导线，则该值为True。

f)ShowSeriesName是可选的，数据标签的系列名称。

g)ShowCategoryName是可选的，数据标签的分类名称。

f)ShowValue是可选的，数据标签的值。

h)ShowPercentage是可选的，数据标签的百分比。

i)ShowBubbleSize是可选的，数据标签的气泡尺寸。

j) Separator是可选的，数据标签的分隔符。

四：SeriesCollection方法返回图表或图表组中单个数据系列（Series对象)或所有数据系列的集合（SeriesCollection集合)的对象，语法如下：expression.SeriesCollection(Index)

可选的Index参数指定数据系列的名称或编号。

五：DataLabels方法则返回代表数据系列中的单个数据标签（DataLabel对象）或所有数据标签的集合（DataLabels集合）的对象，语法如下：

expression.DataLabels(Index)

可选的Index参数指定数据系列中的数据标签的编号。

今日内容回向：

1 上面讲了五种方法，都有哪些意义？