VBA: Tilføje dataserie til graf

Hej Eksperter.

Jeg har en lille udfordring i forhold til at lave en automatiseret tilføjelse af en dataserie til en graf:

Nu bruger jeg følgende kommandoer:

    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(10).XValues = "=Grafdata!R7C3"
    ActiveChart.SeriesCollection(10).Values = "=Grafdata!R7C4"
    ActiveChart.SeriesCollection(10).Name = "=Grafdata!R7C2"
    ActiveChart.SeriesCollection(10).BubbleSizes = "=Grafdata!R7C5"
    ActiveChart.ChartType = xlBubble

Jeg vil gerne kunne udføre, samme kommando med tilføjelse af en serie, men hvor kommandoen ikke er afhængig af, hvor mange serier, der allerede er i grafen.

Altså i stedet for, at det er SeriesCollection(10), så skal det være SeriesCollection(n+1), hvor n er det nuværende antal serier.

Jeg kan ikke knække nøden. Kan dette lade sig gøre?