ich möchte gerne ein Arbeitsblatt kopieren, auf diesem ist ein Diagramm abgebildet!! Wenn ich das Arbeitsblatt kopiere, funktioniert mein dynamisches Diagramm auf dem kopiertem Arbeitsblatt nicht mehr!! Es soll eine Vorlage sein, daher möchte ich die Anpassung automatisieren!! Bei meinem VBA Code bekomme ich folgende Fehlermeldung(siehe unterhalb), "Laufzeitfehler 424: Objekt erforderlich. Hat jemand einen Tip für mich? Danke
Gruß Shayev
Sub Test()
For i = 1 To Sheets("Overview").Range("G4")
Sheets("Master").Copy After:=Sheets(i)
ActiveSheet.Name = "Station" & i
ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.SeriesCollection(1).Values = "Station" & i!OperationStarting
ActiveChart.SeriesCollection(2).Values = "Station" & i!Walk
ActiveChart.SeriesCollection(3).Values = "Station" & i!Manual
ActiveChart.SeriesCollection(4).Values = "Station" & i!Automatic
ActiveChart.SeriesCollection(5).Values = "Station" & i!TaktTime
ActiveChart.SeriesCollection(6).Values = "Station" & i!Other
ActiveChart.SeriesCollection(6).XValues = "Station" & i!Step
Next i
Sheets("Overview").Select
End Sub