FormatCondition = True?

[macdian]

Hi,

I'm trying to use a macro to delete a cell if it IS conditional formatted.

It seems right now that the colorvalue of the font is NOT stored in Font.ColorIndex, and so my IF statement based on that is not working either.

Here's the statement I am trying to use:

Public Sub DeleteHighlighted()
Set rng = Selection
For Each c In rng
        If c.FomratCondition = True Then
           c.Clear
        Else
        End If
    Next c
End Sub

edit: This is the formula I'm using for the conditional format:

=COUNTIF($V:$V,U1)>0

Help is much appreciated!

 

[macdian]

Thanks, Tom, I was able to get that to work. Thanks again.