Highlighting duplicate value based on column values

[Monty9]

Hello,

I am trying to find a way to perform a check to highlight duplicate values based on the value in another column. For example in the table below I have 2 sorted columns A and B, I need to iterate each value in Column A and highlight duplicate values in Column B

​

Column A​	Column B​
Color	Black
Color	White
Color	Black
Color	Grey
Breed	German Shephard
Breed	German Shephard
Breed	Labra
Breed	Husky

Here, in Column A for Color the code should iterate Column B and highlight duplicate (for ex. Black is highlighted) and then going to the next value in Column A i.e. Breed the code should again look and highlight duplicates (for ex. German Shephard)

Thank You

 

[Monty9]

Hello, a VBA demonstration for starters :​

Sub Demo1()
    Dim V, R&
        V = Evaluate(Replace("IF({1},COUNTIFS($A$1:$A$#,$A$1:$A$#,$B$1:$B$#,$B$1:$B$#))", "#", [A1].CurrentRegion.Rows.Count))
        Application.ScreenUpdating = False
    For R = 1 To UBound(V)
        If V(R, 1) > 1 Then Cells(R, 2).Font.Color = vbRed
    Next
        Application.ScreenUpdating = True
End Sub

​

Thank you very much for the solution code.