Gruppe
Grafik
Problem
Wie kann ich eine Diagrammdatenreihe mit VBA-Befehl ändern?
StandardModule: basMain
Sub DatenreiheAendern()
Dim cht As Chart
Dim rng As Range
Set cht = Worksheets(2).ChartObjects(2).Chart
With Worksheets(2)
Set rng = .Range(.Cells(1, 1), .Cells(100, 1))
End With
cht.SeriesCollection(2).Values = rng
End Sub