Finding duplicate values

[wongsh]

Hi,

Can anyone share with me a program to find the next duplicate value in a column and select the cell? Appreciate your help!!

[jolivanes]

Is this what you mean?

Sub Find_Dup()
Columns(1).Find(Selection.Value, Selection, , 1).Select
End Sub