VBA code tunen (Charts werte zuweisen)
08.09.2004 10:16:49
th0mas
Ich möchte folgende VBA-Codezeilen tunen, sodass ich ohne activate auskomme und das ganze in einen Befehl packen kann. Derzeit sieht das so aus:
.ChartObjects("Chart 9").Activate
ActiveChart.SeriesCollection(1).Values = "=Graphics!R31C2:R31C5"
Das ganze ist in einem with block, tut allerdings nichts zur Sache. Wenn ich die beiden Zeilen wie folgt zusammenhänge:
.ChartObjects("Chart 9").SeriesCollection(1).Values = "=Graphics!R31C2:R31C5"
bekomme ich immer einen Fehler. Hat jemand eine Lösung für mich?
Danke und lg,
Thomas