Как изменить sourcedata для определенной серии на диаграмме в VBA

Question

Мне нужно изменить sourcedata определенной серии диаграмм в VBA. Я видел код, используемый в этом: 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")