Ich bin fast am verzweifeln. Ich moechte ein Chart mit Hilfe eines Macros erstellen. Die Werte werden dabei in einem Array eingelesen und dem Chart zugewiesen. Leider bekomme ich beim folgenden code im eine Laufzeitfehler (1004).
Der Code funktioniert (oder auch nicht) wie folgt:
In Zelle A1 habe ich eine formel eingegeben, das Ergebnis aus A1 wird in A2 gespeichert und ein neuer Wert, der sich auf dem vorhergehenden bezieht, wird in A1 wird berrechnet. Also
X(n+1) = X(n)+
Hier der Code:
Dim varYArray(40) As Variant
varYArray(1) = ActiveSheet.Cells(2, 2)
For i = 1 To 40
varYArray(i) = ActiveSheet.Cells(2, 1)
ActiveSheet.Cells(2, 2) = varYArray(i)
Next i
'create new chart
Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Values = varYArray
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
Ich glaube, dass Problem liegt bei der Array-Definition. Es sind 40 Werte erlaubt, aber irgendwie zaehlt mein For Next Loop immer bis 41. Dabei ist mein Array natuerlich ueber den zugelassenen Bereich und wenn ich den Array einem Chart zuweise gibt es natuerlich Probleme.
Ich sollte vielleicht auch erwaehnen, dass ich option base 1 benutze. Test wie nur bis 39 zaehlen habe ich auch schon getestet.
Hat jemand eine idee????
Danke
Tino