Hi Ed,

If you want to add conditionnal formatting with your macro
Selection.FormatConditions.Add

If you want to test Range("B3").Value and then apply format changes
With Selection.Interior
.ColorIndex = 1
End With
With Selection.Font
.Name = "Arial Narrow"
.FontStyle = "Normal"
.ColorIndex = 2
End With


HTH
Carim