Range.FormatConditions (Excel)

Returns a FormatConditions collection that represents all the conditional formats for the specified range.

Dim fcdsFormatConditions As FormatConditions
Set fcdsFormatConditions = ActiveCell.FormatConditions