XY Scatterplot Chart Macro

[ttbuson]

I have the following vba code, which should go through series 1-30 in chart 1 and format them according to the code. But the code tells me that there's an invalid parameter with the line "With .SeriesCollection(i)". Does anyone know what's going on? I'm at a loss. I thought this should work correctly. Thanks in advance!

Sub FormatDataPoints()

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
 
Dim i As Long
 
    With ActiveSheet.ChartObjects("Chart 1").Chart
        For i = 31 To 40
            With .SeriesCollection(i)
                .MarkerStyle = 2
                .MarkerSize = 7
                .Format.Fill.ForeColor.RGB = RGB(0, 128, 0)
                .Format.Line.Visible = msoFalse
                .ApplyDataLabels
                    With .DataLabels
                        .ShowSeriesName = True
                        .ShowValue = False
                        .Position = Above
                        .Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB = RGB(0, 128, 0)
                    End With
            End With
        Next i
    End With
    
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
 
End Sub

 

[pgc01]

I have the following vba code, which should go through series 1-30 in chart 1 and format them according to the code.

...
 
        For i = 31 To 40
            With .SeriesCollection(i)

Hi

You say the code shoud go through series 1-30, but is goes through series 31-40. Is that ok? How many series has the chart?

 

[Firefly2012]

I get that error in 2010 when the counter value (ie i) is outside the range of the index of the series collection

 

[ttbuson]

@pgc01, yeah, that's a typo in my original post. The macro should go through series 31 through 40.

@Firefly2012, that makes a lot of sense. I think what's happening is that I'm trying to run the macro with the rows hidden and it's not working because in 2010 the series are not counted when the rows containing the data are hidden. Does that seem like it makes sense to you?