Ich habe ein Makro, mit dem ich in einer große Excel-Dateiaus aus ausgewählten Arbeitsblättern, die ich vorher markiere, jeweils eine separate Datenreihe mit immer den gleichen X-Werten ($C$8:$C$508) und Y-Werten ($AK$8:$AK$508) in ein bereits existierendes X-Y-Diagramm einfügen möchte.
Volker aus Bonn
Sub Sr()
Dim ws As Worksheet
For Each ws In ActiveWindow.SelectedSheets
ws.Range("C4:C520,AK4:Ak520").Copy
Charts("Sr").SeriesCollection.Paste Rowcol:=xlColumns, SeriesLabels:=True, _
CategoryLabels:=False, Replace:=False, NewSeries:=True
Next
End Sub
Die resultierenden Datenreihen sehen für das Tabellenblatt "1A-24H-1" etwa wie folgt aus:
=DATENREIHE('1A-24H-1'!$AK$3,'1A-20H-1'!$C$4:$C$516,'1A-24H-1'!$AK$4:$AK$520,1)
Das Problem ist, dass dabei nur Titel und Y-Wert, aber nicht die Verweise für X übernommen werden. Diese werden vielmehr für alle eingefügten Datenreihen von der selben letzten Datenreihe übernommen. Hat jemand eine Idee, wie ich das ändern kann?
Volker