ich habe ein Problem mit dem Löschen von Datenreihen in einem Diagramm.
Bevor ich per VBA eine neue Datenreihe hinzufüge, will ich alle außer der ersten löschen, damit es nicht immer mehr werden.
Funktioniert beim ersten mal auch ganz gut:
j = ActiveChart.SeriesCollection.count
If j größer oder gleich 2 Then
For j = 2 To j
ActiveChart.SeriesCollection(j).Delete
Next
End If
Danach wird mit NewSeries eine neue Datenreihe "SeriesCollection(2)" angelegt.
Sobald ich aber das makro erneut aufrufe, kommt die Fehlermeldung:
Laufzeitfehler 1004. Die delete-Methode des Series-Objektes konnte nicht ausgeführt werden.
Hat jemand eine Idee, woran das liegen könnte bzw. warum das erst beim 2. mal auftritt und nicht schon beim ersten mal?
Vielen Dank im voraus,
Heiko