fill EOR

[MR3]

I need to fill every other row gray starting with row 2.
then every other row starting with row 3 light green.

but from columns a to z i am trying to put this in my macro but for all rows filled but not blank rows. blank rows only exist underneath the last row that contains actual data

 

[Rick Rothstein]

Does this macro do what you want?

Sub AlternateColorFilledRows()
  Dim X As Long, LastRow As Long
  LastRow = Cells(Rows.Count, "A").End(xlUp).Row
  Range("A2:Z" & LastRow).Interior.ColorIndex = 15
  For X = 3 To LastRow Step 2
    Cells(X, "A").Resize(, 26).Interior.ColorIndex = 35
  Next
End Sub

 

[MR3]

it does EXACTLY what i want, THANKS Rick!