add background color to data in worksheet

[daillest319]

i trying to write a macro to add Yellow background color to all the data starting from row 2 in a specfic worksheet but the rows of data is always different it coulsbe from row 2 to 50 then the next day from row 2 to 100 etc.


i recorded a macro but it not really helping me.

Sub Macro2() 
    Range("A2").Select
    Range("A2:O56").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 65535
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With

End Sub

 

[kevin lazell]

hi daillest319
try the following


Sub Macro2()
x=range("o" & rows.count).end(xlup)
Range("A2:O" & x).Select
With Selection.Interior.colorindex=6

End With

End Sub

cheers

kevin

 

[daillest319]

thanks but it didn't work it crapped out on this line

Range("A2:O" & x).Select

 

[kevin lazell]

hi daillest319

sorry my mistake
try the following


Sub Macro2()

x = Range("o" & Rows.Count).End(xlUp).Row
Range("A2:O" & x).Interior.ColorIndex = 6


End Sub

cheers

kevin

 

[daillest319]

worked perfect thank you for your help