У меня проблемы с выяснением синтаксиса для назначения значения SeriesCollection. Я пытаюсь установить его так:
.SeriesCollection(1).Values = Range(Cells(4, tCols + 14), Cells(4, tCols + 12 + z)).Address
Этот адрес является правильным диапазоном для того, что я пытаюсь использовать, но меня сбивают с толку, когда я пытаюсь присвоить его значению SeriesCollection , Может ли кто-нибудь помочь мне с правильным синтаксисом? Большое спасибо
Полный код ниже:
Dim advStatObj As ChartObject
Dim advStatChart As Chart
Set advStatObj = Sheets("AdvStats").ChartObjects.Add(Top:=Cells(7, tCols + 13).Top, Left:=Cells(7, tCols + 13).Left, Width:=800, Height:=500)
Set advStatChart = advStatObj.Chart
With advStatChart
.ChartType = xlColumnClustered
.SeriesCollection.NewSeries
.SeriesCollection(1).name = "=""Projected"""
.SeriesCollection(1).Values = Range(Cells(4, tCols + 14), Cells(4, tCols + 12 + z)).Address
.SeriesCollection.NewSeries
.SeriesCollection(2).name = "=""Current"""
'goes on
End With