Office: Bezug einer Datenreihe per VBA ändern

Hallo Leute,

ich habe ein seltsames Phänomen: habe ein Diagramm erstellt, greife darauf per Makro zu, um den Bezug der Datenreihen zu ändern und zunächst funktioniert auch alles prächtig. Bei einem späteren Durchlauf bricht der Makrocode ab mit der Fehlermeldung "Laufzeitfehler 9: Index außerhalb des gültigen Bereichs". Hier der Auszug aus meinem Makrocode:

Sheets("GuV").ChartObjects("DiaDatentabelle").Chart.SeriesCollection(1).Values = Sheets("Berechnung").Range("I122:I132")

Die Datenreihe 1 ist weiterhin vorhanden. Wenn ich das Diagramm anklicke und auf "Daten auswählen" gehe, sehe ich das im Dialog auch (siehe Screenshot im Anhang).

Kurioserweise funktioniert alles wieder, wenn ich die Datei schließe und neu öffne.

Ich freue mich über jeden Hinweis, der mich auf die richtige Spur bringt.

Danke im Voraus,
Christian

:)

 

Hi Christian,

versuche es mal indem du Sheets("Berechnung").Range("I122:I132") durch dieses ersetzt: "=Berechnung!I122:I132"

 

Hi Beverly,

habe ich auch schon versucht. Hat nichts geholfen...

Gruß
Christian

 

Hi Christian,

lade doch mal die Mappe hoch - vielleicht kann ich es ja nachvollziehen.