Color Font to White

[Guzzlr]

Range("B4:F4").Select
With Selection
.Interior.ColorIndex = 1
.Font.Name = "Calibri"
.Font.Size = 12
.Font.ColorIndex = 0
End With

Hello All,
I'm trying to write a simple code that will turn range B4:F4 Fill to Black, but the font to white, so it will show in the black field. I'm having trouble turning the font to white. Everything else is working.
Thanks for the help
excel 2013

 

[alansidman]

try changing the font color index to 2

 

[Guzzlr]

try changing the font color index to 2

Ohh...
Thanks

 

[Guzzlr]

getting back to this problem, I still am not able to get the font to have a white color to show up on the black background.
My code is:

Range("B4:F4").Select
With Selection
.Interior.ColorIndex = 1
.Font.Name = "Calibri"
.Font.Size = 12
.Font.Color = 1

Thanks for the help

 

[Fluff]

It should be

.Font.ColorIndex = 2

 

[Guzzlr]

It should be

.Font.ColorIndex = 2

That got it working, thank you