@SamT


On the contrary:

Sub M_snb() 
    For Each it In sheets("Revenue Sheet").Range("D1:D2000") 
        it.EntireRow.Hidden = it.Interior.Color = RGB(0, 176, 240) 
    Next 
End Sub
Means that actual (the ever present) color of the interior of the cell in column D determines whether the corresponding row is being hidden or not.
The color doesn't change, the visibility otf the row does.