Hallo nochmal,
vielleicht kann mir jemand helfen, wenn ich euch den VBA Code meines Diagramms mal zeige
Wie gesagt, ich möchte noch eine Diagrammlinie hinzufügen.
Die x-Werte (nur jede zweite Zeile!!) für die Linie sollen aus Spalte 1, Zeile 1 bis zur letzten Zeile ausgelesen werden.
Die y-Werte (nur jede zweite Zeile!!) für die Linie sollen aus Spalte 2, Zeile 1 bis zur letzten Zeile ausgelesen werden.
Hier ein Ausschnitt aus dem Code meines Diagramms:
Private Sub
......
With Worksheets(1)
Letzte = IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(.Rows.Count, 1).End(xlUp).Row, .Rows.Count)
For Zeile = 35 To Letzte Step 6
With chDiagramm1
.SeriesCollection.NewSeries
.SeriesCollection(Zaehler).XValues = "=Diagramm1!R" & Zeile & "C16:R" & Zeile + 5 & "C16"
.SeriesCollection(Zaehler).Values = "=Diagramm1!R" & Zeile & "C5:R" & Zeile + 5 & "C5"
.SeriesCollection(Zaehler).Name = "=Verdichterkennwerte!R" & Zeile & "C36"
End With
Zaehler = Zaehler + 1
Next Zeile
.....
End Sub
Ich hab schon ewig probiert, aber ich bekomms einfach nicht gebacken.
Für eure Hilfe wäre ich sehr dankbar!
Gruß
Tobias