如何在VBA中更改图表中特定系列的sourcedata

Question

我需要在VBA中更改特定系列图表的sourcedata。我看到了这里使用的代码：How to get the the source data of all the series of a chart in 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")