Chart 对象 (Excel)

代表工作簿中的图表。

注解

图表可以是内嵌图表（嵌入 ChartObject 对象中），也可以是单独的图表工作表。

Charts 集合包含工作簿中每个图表工作表的 Chart 对象。 Charts(index)（其中 index 是图表工作表索引号或名称）可用于返回一个 Chart 对象。

图表 index 号表示图表工作表在工作簿标签栏上的位置。 Charts(1) 是工作簿中的第一个（最左侧）图表，Charts(Charts.Count) 是最后一个（最右侧）图表。

所有图表工作表都计入索引计数，即使处于隐藏状态，也不例外。图表工作表名称显示在图表的工作簿标签上。使用 ChartObject 对象的 Name 属性设置或返回图表名称。

下面的示例在图表工作表 1 中更改系列 1 的颜色。

Charts(1).SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbRed

下面的示例将名为“Sales”的图表移到活动工作簿的末尾。

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

Chart 对象也是 Sheets 集合的成员。此集合包含工作簿中的所有工作表（图表工作表和工作表）。 Sheets(index)（其中 index 是工作表索引号或名称）可用于返回一个表。

如果图表是活动对象，可以使用 ActiveChart 属性引用它。如果用户已选择图表工作表，或已使用 Chart 对象的 Activate 方法或 ChartObject 对象的 Activate 方法激活了图表工作表，图表工作表就是活动对象。

下面的示例激活图表工作表 1，并设置图表类型和标题。

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

如果用户已选择内嵌图表，或已使用 Activate 方法激活内嵌图表中包含的 ChartObject 对象，内嵌图表就是活动对象。

下面的示例激活工作表 1 中的内嵌图表 1，并设置图表类型和标题。请注意，在激活内嵌图表后，此示例中的代码与上一示例相同。使用 ActiveChart 属性，可以写入 Visual Basic 代码，从而引用内嵌图表或图表工作表（以活动对象为准）。

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

如果图表工作表是活动工作表，可以使用 ActiveSheet 属性引用它。下面的示例使用 Activate 方法激活名为 Chart1 的图表工作表，并将图表中系列 1 的内部颜色设置为蓝色。

Charts("chart1").Activate 
ActiveSheet.SeriesCollection(1).Format.Fill.ForeColor.RGB = rgbBlue

有关于 Office VBA 或本文档的疑问或反馈？请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。