Code vereinfachen
01.07.2003 15:02:22
Ingo
habe durch Aufzeichnung den Code zum füllen eines Diagrammes ermittelt und festgestellt, daß der ein wenig lang wird. Kann man da nicht irgendwie etwas verkürzen? XValue bleibt ja z.B. gleich.
Vielen Dank,
Ingo
ActiveChart.SeriesCollection(1).XValues = "=Datenquelle!R49C1:R52C1"
ActiveChart.SeriesCollection(1).Values = "=Datenquelle!R49C2:R52C2"
ActiveChart.SeriesCollection(1).Name = "=Datenquelle!R1C2"
ActiveChart.SeriesCollection(2).XValues = "=Datenquelle!R49C1:R52C1"
ActiveChart.SeriesCollection(2).Values = "=Datenquelle!R49C3:R52C3"
ActiveChart.SeriesCollection(2).Name = "=Datenquelle!R1C3"
ActiveChart.SeriesCollection(3).XValues = "=Datenquelle!R49C1:R52C1"
ActiveChart.SeriesCollection(3).Values = "=Datenquelle!R49C4:R52C4"
ActiveChart.SeriesCollection(3).Name = "=Datenquelle!R1C4"