Need an excel macro or sub which can find duplicate cells (of text) remove them and keep unique records

I need a sub in VBA excel which will remove duplicate or even triplicate records - and keep only unique cells of text.
Who is Participating?
Here's a menu command that does it:

 Filter for unique records  
Select the column or click a cell in the range or list you want to filter.
On the Data menu, point to Filter, and then click Advanced Filter.
Do one of the following.
To filter the range or list in place, similar to using AutoFilter, click Filter the list, in-place.
To copy the results of the filter to another location, click Copy to another location. Then, in the Copy To box, enter a cell reference.
To select a cell, click Collapse Dialog  to temporarily hide the dialog box. Select the cell on the worksheet, and then press Expand Dialog .

Select the Unique records only check box.
Note   Once you filter for unique values, you can copy them to another worksheet and then archive or delete the original worksheet.

Here's the macro that does it:

Sub Macro3()
' Macro3 Macro
' Macro recorded 3/27/2006 by Sam

    Range("A1:A12").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
End Sub

Jeroen RosinkSoftware testing consultantCommented:
You also might take a look at a free excel add-in which is developed by one of our Excel geniusses. It can be downloaded from:

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.