Using VBA to apply conditional formatting to a range of cells

Question

I would like to know how to access the column in conditional formatting titled \'Applies To\' and input my own conditions. I have included a screenshot for better reference.

Answer 1

The "applies to" is inherent in the Selection that the With block is performed on.

Answer 2

You need to do something like this (Range("A25") is exactly what you are going to find):

With Range("A25")
        .FormatConditions.Delete
        .FormatConditions.Add Type:=xlExpression, _
            Formula1:="=" & c.Address 
        '.
        '.
        '.
End With

and there is no need to write "=" & c.Address & "=TRUE", you can use just "=" & c.Address.