Using variable in Range in Sub

[Orada]

Hi

I seem to be confusing the use of variables in ranges somehow so would appreciate help. The code below is intended to highlight one row as defined by the variable r which is a for next counter, but instead it highlights the whole sheet.

Range("A" & r & ":S" & r).Select
    With Selection.Interior
        .ColorIndex = 15
        .Pattern = xlSolid
    End With

The routines below to clear certain columns and remove all formatting before running work fine but these variables are not part of a loop counter.

    Range("A" & firstrow & ":A" & lastrow).Select
    Selection.clearcontents
    
    Range("R" & firstrow & ":S" & lastrow).Select
    Selection.clearcontents

    Range("A" & firstrow & ":S" & lastrow).Select
    Selection.Interior.ColorIndex = xlNone

Some insight from the more experienced as to what I am doing wrong would be greatly appreciated.

[stnkynts]

Instead of

Range("A" & r & ":S" & r).Select
    With Selection.Interior
        .ColorIndex = 15
        .Pattern = xlSolid
    End With

Try:

With Range("A" & r , "S" & r).Interior
   .ColorIndex = 15
   .Pattern = xlSolid
End With

Instead of

    Range("A" & firstrow & ":A" & lastrow).Select
    Selection.clearcontents
    
    Range("R" & firstrow & ":S" & lastrow).Select
    Selection.clearcontents

    Range("A" & firstrow & ":S" & lastrow).Select
    Selection.Interior.ColorIndex = xlNone

Try:

Range("A" & firstrow , "A" & lastrow).ClearContents
Range("R" & firstrow , "S" & lastrow).ClearContents
Range("A" & firstrow , "S" & lastrow).Interior.ColorIndex = xlNone

[Orada]

Try:

With Range("A" & r , "S" & r).Interior
   .ColorIndex = 15
   .Pattern = xlSolid
End With

Try:

Range("A" & firstrow , "A" & lastrow).ClearContents
Range("R" & firstrow , "S" & lastrow).ClearContents
Range("A" & firstrow , "S" & lastrow).Interior.ColorIndex = xlNone

Thanks but got runtime error - Method chance of object global failed.

[stnkynts]

Could you submit your whole code or a copy of the workbook for review?

[StephenR]

Your first bit of code should select A1:S1 (or whatever r equals) - are you saying it doesn't? Apart from unnecessary use of Select your use of variables looks fine to me.

[Orada]

Your first bit of code should select A1:S1 (or whatever r equals) - are you saying it doesn't? Apart from unnecessary use of Select your use of variables looks fine to me.

OK, I'm losing the variable, when r is null then the complete worksheet gets selected for format.

I'll get it sorted now, thanks, I had been calling the routine from a workbook