Hallo,

habe eine kurze Frage.

Ich plotte über unten stehenden Code verschiedene xlXYScatterLines in ein Diagramm.
Leider werden mir nur max. 15 angezeigt.

Kann es sein dass VBA / Excel da eine Obergrenze irgendwo hinterlegt hat? Und kann ich die ändern?

Würde mich über nen guten Tipp freuen!

    Dim Diagramm As ChartObject
    Dim Position As Range

For Schritt_S = 1 To Schritte_Steigung

        variable = Range(Cells(erste_Z + 1, 7 + Schritt_S), Cells(erste_Z + Schritte_v, 7 + Schritt_S)).Address

            With Diagramm.Chart
                .ChartType = xlXYScatterLinesNoMarkers
                .SeriesCollection.NewSeries
                .SeriesCollection(Schritt_S).XValues = Worksheets("Fahrwiderstandsmomente").Range("G6:G206")
                .SeriesCollection(Schritt_S).Values = Worksheets("Fahrwiderstandsmomente").Range(variable)
                .SeriesCollection(Schritt_S).Format.Line.ForeColor.RGB = RGB(0, 0, 0)
                .SeriesCollection(Schritt_S).Name = Schritt_S & " % Steigung"

             End With

 Next Schritt_S