vba error 1004 when changing .interior

[bertjeiv]

Hello all

I get a 1004 error message when I pass this code:

                With Sheets("overview").Range(Cells(2, 27), Cells(2, 26 + j)).Interior
                    .Pattern = xlSolid
                    .PatternColorIndex = xlAutomatic
                    .ThemeColor = xlThemeColorAccent1
                    .TintAndShade = -0.249977111117893
                    .PatternTintAndShade = 0
                End With

j is 63 for example. when the code "breaks" on this line and I hit continue the script carries on without problems and it even does what it is supposed to do with the code above. so I dont understand why I get that message.

thanks in advance

 

[VoG]

Try

                With Sheets("overview").Range(Sheets("overview").Cells(2, 27), Sheets("overview").Cells(2, 26 + j)).Interior
                    .Pattern = xlSolid
                    .PatternColorIndex = xlAutomatic
                    .ThemeColor = xlThemeColorAccent1
                    .TintAndShade = -0.249977111117893
                    .PatternTintAndShade = 0
                End With

 

[bertjeiv]

great it works now I understand why it gave me that error, because it was working on the wrong page.

thanks a lot !