How to code this
A different approach that uses code to set the conditional format method
directly on the sheet.
With Sheets("Sheet1").Range("A2:A48")
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:="=$A$1="""""
.FormatConditions(1).Font.ColorIndex = 2
.FormatConditions.Add Type:=xlExpression, Formula1:="=$A$1<"""""
.FormatConditions(2).Font.ColorIndex = 5
End With
--
Cheers
Nigel
"Corey" wrote in message
...
How would i do this via code:
If "A1"="" then "A2" font Colour="White"
else "A2" font colour="Blue"
I want to do this to a range of cells from A1:A48
Regards
Corey
|