Excel VBA教程:Chart对象

   
多个对象
Chart
多个对象

代表工作簿中的图表。该图表既可为嵌入图表(包含在ChartObject 中),也可为一个单独的图表工作表。

Chart对象用法

本部分将说明下列返回 Chart对象的属性和方法:

Chart属性

可用 Chart属性返回 Chart对象,该对象代表包含在 ChartObject对象中的图表。下例设置工作表 Sheet1 上第一个嵌入图表中图表区的图案。


Worksheets("Sheet1").ChartObjects(1).Chart. _
    ChartArea.Interior.Pattern = xlLightDown

Charts方法

Charts集合中的每个 Chart对象代表工作簿中的一张图表工作表。使用 Charts(index)(其中 index 是该图表工作表的索引号或名称)可返回单个的 Chart对象。下例更改第一张图表工作表中第一个系列的颜色。


Charts(1).SeriesCollection(1).Interior.Color = RGB(255, 0, 0)

图表工作表的索引号表示图表工作表在工作簿的工作表标签栏上的位置。Charts(1) 是工作簿中第一个(最左边的)图表工作表;Charts(Charts.Count) 为最后一个(最右边的)图表工作表。所有的图表工作表均包括在索引号序列中,即便是隐藏图表也不例外。图表工作表的名称出现在工作簿中该图表的标签上。可用Name属性设置或返回图表名称。

下例将图表“Sales”移至活动工作簿的尾部。


Charts("Sales").Move after:=Sheets(Sheets.Count)

Chart对象也是Sheets集合的成员。Sheets集合包含工作簿中所有的工作表(既包括工作表,也包括图表工作表)。可用 Sheets(index)(其中 index 为工作表的索引号或名称)返回单张工作表。

ActiveChart属性

当图表为活动对象时,可用 ActiveChart属性来对其进行引用。如果用户选定了图表工作表,或用Activate方法激活了图表工作表,该图表工作表就处于活动状态。下例激活第一张图表工作表,并设置图表类型和标题。


Charts(1).Activate
With ActiveChart
    .Type = xlLine
    .HasTitle = True
    .ChartTitle.Text = "January Sales"
End With

如果用户选定了嵌入图表,或用 Activate方法激活了包含嵌入图表的ChartObject对象,则该嵌入图表就处于活动状态。下例激活第一张工作表上的第一张嵌入图表,并设置图表类型和标题。请注意,当激活嵌入图表之后,本示例中的代码与上例中的代码相同。在 Visual Basic 代码中使用 ActiveChart属性,既可引用嵌入图表,也可引用图表工作表(只要该图表处于活动状态)。


Worksheets(1).ChartObjects(1).Activate
ActiveChart.Type = xlLine
ActiveChart.HasTitle = True
ActiveChart.ChartTitle.Text = "January Sales"

ActiveSheet属性

当图表工作表为活动工作表时,可用 ActiveSheet属性引用之。下例使用 Activate方法激活名为 Chart1 的图表工作表,并将图表中第一个系列的内部颜色设置为蓝色。


Charts("chart1").Activate
ActiveSheet.SeriesCollection(1).Interior.ColorIndex = 5

上页:Excel VBA教程:Characters对象 下页:Excel VBA教程:ChartArea对象

Excel VBA教程:Chart对象

Excel VBA教程:ChartArea对象 Excel VBA教程:ChartColorFormat对象
Excel VBA教程:ChartFillFormat对象 Excel VBA教程:ChartGroup对象
Excel VBA教程:ChartGroups集合 Excel VBA教程:ChartObject对象
Excel VBA教程:ChartObjects集合对象 Excel VBA教程:Charts集合
Excel VBA教程:ChartTitle对象 Excel VBA教程:ColorFormat对象
Excel VBA教程:Comment对象 Excel VBA教程:Comments集合对象
Excel VBA教程:ConnectorFormat对象 Excel VBA教程:ControlFormat对象
Excel VBA教程:Corners对象 Excel VBA教程:CubeField对象
Excel VBA教程:CubeFields集合对象 Excel VBA教程:CustomProperties集合
Excel VBA教程:CustomProperty对象 Excel VBA教程:CustomView对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号