如何在VBA中更改图表中特定系列的源数据

我需要在VBA中更改特定系列图表的源数据。 我看到了这个代码： 如何获取VBA中所有图表系列的源数据？ 我的代码如下所示：

For Each objChrt In ActiveSheet.ChartObjects Set myChart = objChrt.Chart myFileName = "myChart" & Index Next 

但我不知道如何改变这个代码：

 ActiveChart.SeriesCollection(i).Values = "=Sheet1!R8C" & j & ":R12C" & j 

顺便说一下，我正在使用Excel 2003.需要一些指导如何做到这一点。

Answer 1

你可以试试这个：

 myChart.SeriesCollection(1).Values = "Sheet1!R2C1:R7C1" ' refers to A2:A7 

如果您已经拥有现有系列的现有图表，上面的工作就可以开始。
如果没有，你需要像这样设置源数据：

 myChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:A7")