Conditional Format overwrighting previous conditional format

Conditional Format overwrighting previous conditional format

Post by ZGF2ZXRoZX » Fri, 11 Apr 2008 23:11:00


Hi, I am trying to format a sheet with three conditional formats but when I
get to the second Conditional Format it is overwrighting previous conditional
format.
I don't understand why this is happening. Anyone any ideas? Code added
below.

Cells.Select
Range("A12").Activate
Application.CutCopyMode = False
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=$B$66"
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.ColorIndex = 5
End With
'Cells.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual,
Formula:="=$F$66"
' Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=$F$66"
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.ColorIndex = xlAutomatic
End With

Thanks in advance.
Davie
 
 
 

Conditional Format overwrighting previous conditional format

Post by VG9tIEh1dG » Fri, 11 Apr 2008 23:51:00

When you add the second conditional format, you have the statement
With Selection.FormatConditions(1).Font

This is referring to the first format . You need to change it to
With Selection.FormatConditions(2).Font

to refer to the second format.

Hope this helps,

Hutch

 
 
 

Conditional Format overwrighting previous conditional format

Post by ZGF2ZXRoZX » Sat, 12 Apr 2008 00:01:01

Doh!! So simple to fix. I must have had too much beer last night.

Thanks Tom.