UniqueValues.DupeUnique (Excel)

Returns or sets one of the constants of the XlDupeUnique enumeration, which specifies if the conditional formatting rule is looking for unique or duplicate values. Possible return values are xlDuplicate - Display duplicate values, xlUnique - Display unique values.

ActiveCell.FormatConditions(1).DupeUnique = xlDuplicate