Changing the font color using VBA

[magoobee]

I have VBA code that changes the background color of a cell but I woul
also like to change the color of the font.

The code below changes the cell RED but I would also like the fon
WHITE.



code:
--------------------------------------------------------------------------------
Case Cells(CurrRow, 8) < 80
CurrRow = Thing.Row
Range(Cells(CurrRow, 8), Cells(CurrRow, 8)).Select
'Grab column 1 where found
With Selection.Interior
.ColorIndex = 3 '3=red
.Pattern = xlSolid
End With

 

[jindon]

Hi

Case Cells(CurrRow, 8) < 80
CurrRow = Thing.Row
Range(Cells(CurrRow, 8), Cells(CurrRow, 8)).Select
'Grab column 1 where found
With Selection.Interior
.ColorIndex = 3 '3=red
.Pattern = xlSolid
.Font.ColorIndex=2
End Wit