マクロで条件付き書式を追加してしまおうとい企画。

まずは、選択範囲の重複を塗ってしまうマクロ。
┌──────────────────────────────────────┐
│Sub 重複検出()                                                              │
│    With Selection                                                          │
│        .FormatConditions.AddUniqueValues                           '重複版 │
│        .FormatConditions(.FormatConditions.Count).SetFirstPriority '最優先 │
│        With .FormatConditions(1)                                           │
│            .DupeUnique = xlDuplicate                                       │
│            .Interior.Color = RGB(255, 0, 0)                                │
│            .Font.Color = RGB(255, 255, 255)                                │
│        End With                                                            │
│    End With                                                                │
│End Sub                                                                     │
└──────────────────────────────────────┘
先頭に条件を追加していくので、
同じセルに対して何回も行うと条件がいっぱい追加されるから注意。

なお、すべて一回消してしまう場合には以下のような感じとなる。
┌──────────────────────────────────────┐
│    With Selection                                                          │
│        .FormatConditions.Delete                                            │
│    End With                                                                │
└──────────────────────────────────────┘
当然、既存のものも消されてしまうので注意。