Try this. If you want row 4 also just change 8 to 4
Sub removecolorfromcellsinrow()
mc = "m"
For i = 8 To Cells(Rows.Count, mc).End(xlUp).Row Step 4
'MsgBox i
Cells(i, mc).Interior.ColorIndex = 0
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"daphoenix" wrote in message
...
how would I Remove the fill color of every fourth row starting after the
4th
row.

thanks