Changing font color based on cell color

61 views Asked by At

I am currently trying to make two buttons to change font color into black or white, based on the cell color being white (blank).

Somehow it does not seem to work at all

Sub colorchange()
    Dim Cell As Range
    For Each Cell In Range("AP74:AX80")
        If Cell.Interior.Color = RGB(0, 0, 0) Then
            Cell.Font.Color = RGB(0, 0, 0)
        End If
    Next Cell
End Sub
0

There are 0 answers