Idenfity duplicate records in a range

[keith05281967]

Greetings VBA wizards,

I'm trying to have my code look thru a specific column of data, in this case ID numbers and hi-lite any duplicates found. This seems simple enough but i'm not having much success.

I recorded a macro and have been using that but it's so complicated I don't know how to manipulate it. I want something simple. Something like the below. The below doesn't work because i'm mis-using a method. Can someone show me the light?


'check for duplicate loans
If Cells(i, ColumnNumber).AddUniqueValues = False Then
Cells(i, ColumnNumber).Interior.ColorIndex = 3
End If


the result i'm looking for would be as follows:

ID column
123456
456789
789123
123456 <-- hi lited because it's a dup.


using Excel 07
thanks,
Keith

 

[philmatth]

Select range A2:A5
Choose Format|Conditional Formatting
From the first dropdown, choose Formula Is
For the formula, enter
=COUNTIF($A$2:$A$5,A2)>1
Click the Format button.
Select a font colour for highlighting.
Click OK, click OK

 

[keith05281967]

thank you for the reply Phil - i'm looking for a vba code solution so that i don't have to be "hands on" in the worksheet.