Excel图表操作材料.docxVIP

第 7 章 图表对象操作 第 7 章 图表对象操作 296  PAGE 2 第 7 章 图表对象操作 在前面的章节中，已经详细讲解了如何使用 Excel VBA 处理 Excel 的数据。除此之外， Excel 还可以创建各种不同类型的图表。数据是图表的基础，而图表则可以更加直观的显 示数据。在 Excel VBA 中，同样给图表提供多种属性和事件。在本章中，将详细讲解如何 使用 VBA 代码编辑图表。 7.1 创建图表 在 Excel 中，用户可以通过向创建所需要的图表类型。同时，用户在开发过程中，通 过 VBA 代码创建各种类型的图表。在本小节中，将详细讲解如何使用 VBA 创建图表。 案例 136 创建图表工作表 1．功能说明 在 Excel VBA 中，用户可以通过 VBA 代码来创建图表工作表。同时可以通过 VBA 代 码来定制图表的属性。 2．语法说明 在 Excel VBA 中，Charts 集合包含工作簿中所有图表工作表的集合。通过 Charts 集合 的 Add 方法可向集合中添加新的图表工作表（新建图表工作表），Add 方法的语法格式如 下： 表达式.Add(Before, After, Count, Type) 该方法的参数都可省略，各参数的含义如下： ? Before：指定工作表的对象，新建的工作表将置于此工作表之前。 ? After：指定工作表的对象，新建的工作表将置于此工作表之后。 ? Count：要添加的工作表数。默认值为 1。 ? Type：指定要添加的图表类型，可创建的图表类型很多，具体可参考 Excel VBA 的帮 助信息。 提示：如果 Before 和 After 两者都被省略，新建的图表工作表将插入到活动工作表之前。 在 Excel VBA 中，通过 Chart 对象的 SetSourceData 方法，可为指定图表设置源数据区 域。其语法格式如下： 表达式.SetSourceData(Source, PlotBy) 该方法的两个参数含义如下：  ? Source：为一个 Range 对象，用来指定图表的源数据区域。 ? PlotBy：指定数据绘制方式。可使用常量 xlColumns（数据系列在行中）和 xlRows（数 据系列在列中）之一。 通过 Chart 对象的 ChartTitle 属性，可返回 ChartTitle 对象，该对象表示指定图表的标 题。通过该对象的属性可控制图表的标题，如设置标题文本、设置标题的格式等。同时， 要设置图表的内容，用户需要熟悉关于图表的属性。其常见的属性如表 7.1 所示。 表 7.1 Chart对象的常用属性 名称意义BackWall是一个只读属性，返回Walls对象，该对象允许用户单独对 三维图表的背景墙进行格式设置。ChartArea是一个只读属性，返回一个ChartArea对象，该对象表示图表 的整个图表区。ChartStyle是一个可读写的Variant型属性，用于返回或设置图表的图表 样式。可以使用介于1到48之间的数字设置图表样式。ChartTitle是一个只读属性，用于返一个ChartTitle对象，表示指定图表 的标题。ChartType是一个可读写的XlChartType类型，用于返回或设置图表类 型。DataTable是一个只读属性，用于返回一个DataTable对象，表示此图表 的数据表。HasAxis是一个可读写的Variant类型属性，用于返回或设置图表上显 示的坐标轴。HasDataTable是一个可读写的Boolean型属性，如果图表有数据表，则该 属性值为True。PlotArea是一个只读属性，用于返回一个PlotArea对象，表示图表的 绘图区。 PlotBy是一个Long型可读写，返回或设置行或列在图表中作为数据 系列使用的方式。可为以下XlRowCol常量之一：xlColumns 或xlRows。Visible返回或设置一个XlSheetVisibility值，用于确定对象是否可 见。Walls是一个只读属性，返回一个Walls对象，此表示三维图表的 背景墙。3．案例说明 某公司统计了该公司武汉、北京、上海、深圳和重庆地区的四个季度的销量数据，根 据该数据，用户需要用 VBA 代码创建图表工作表，其中原始数据如图 7.1 所示。 298  PAGE 4 图 7.1 原始数据 4．编写代码 销量分析图表的 VBA 代码如下： Sub CreatCharts() Dim cht As Chart Set cht = Charts.Add With cht .SetSourceData Sourc