Flexibles Diagramm
16.10.2006 17:09:26
Treffner
habe ein kleines Problem bei der Erstellung eines Diagramms.
Habe auf der Tabe "Auswertung" eine einfache Tabelle mit einer bekannten Anzahl von Zeilen (maxZeile) und 22 Spalten, von denen ich aber nur neben der x-Werte-Spalte jede dritte für das Diagramm brauche (also 7 Graphen=Linien insgesamt).
Ein Makro führt Berechnungen in der Tabelle aus und soll im Anschluss das Diagramm auf der Tabe "Diagramm01" aktualisieren.
In meinem Makro steht dann irgendwann
DIM dummy as String
...
Sheets("Diagramm01").Select
For i = 1 TO 7
dummy = "=Auswertung!R4C1:R" & maxZeile & "C1"
ActiveChart.SeriesCollection(i).XValues = dummy
dummy = "=Auswertung!R4C" & (1+i*3) & ":R" & maxZeile & _
(1+i*3)
ActiveChart.SeriesCollection(i).Values = dummy
dummy = "=Auswertung!R2C" & (1+i*3) 'Spaltenkopf
ActiveChart.SeriesCollection(i).Name = dummy
Next
In der Zeile mit .values steigt das Makro immer aus mit der Fehlermeldung:
"Die Value-Eigenschaften des Series-Objektes kann nicht festgelegt werden."
Habe schon das Forum durchsucht, aber keine Lösung gefunden.
Kann mir dabei einer helfen???
Vielen Dank