How to remove only unique and keep duplicates

**shaunkimura** · 09-09-2009, 12:25 PM

I have been trying for a day now to figure out how to remove the unique cells and keep the duplicates only. I have tried a macro but it does not seem to work. Has any one run into this before. I have attached a sample what I would like to do is remove all non-duplicates from column A. The only macro I could find was this:

Please Login or Register  to view this content.

But this did not work. Any Ideas would be much appreciated.

**JBeaucaire** · 09-09-2009, 01:09 PM

Let's be clear. If your list is:

ACLU0403598
ACLU0403598
ACLU0403598
ACLU0406600
ACLU0406581
ACLU0406581

Then the only item you would want removed is ACLU0406600 (the red line)? We're keeping ALL instances of duplicates? Or are we keeping ONE instance of duplicates and removing the dupes AND unique values (the red and the blue lines)?

When posting a sheet, BEFORE/AFTER examples make it clearest what you're after.

**shaunkimura** · 09-09-2009, 01:14 PM

Then the only item you would want removed is ACLU0406600 (the red line)? Yes
I would like only the red line removed and keep all instances of dups. I will be more clear next time.

**MickG** · 09-09-2009, 01:15 PM

Hi, Try:-

Please Login or Register  to view this content.

Regards Mick

**shaunkimura** · 09-09-2009, 01:34 PM

Originally Posted by MickG

Hi, Try:-

Please Login or Register  to view this content.

Regards Mick

That worked Thanks your great!

**shaunkimura** · 09-09-2009, 01:43 PM

Mick added the .EntireRow.Delete to remove the whole row hope this works. Thanks again.

**MickG** · 10-27-2010, 09:17 AM

Hi, Try this, Results start "D2".

Please Login or Register  to view this content.

Regards Mick

**tmduffy** · 10-27-2010, 01:22 PM

Hi Mick,

Amazing! This worked wonderfully. Thank you! There is only one little glitch. In the results, there appears to be a few duplicates that were not in the original spreadsheet. I can simply filter it to remove the duplicates, correct?

Original
188 Abalgin
15577 Abalgin
61193 Abalgin

Results from Macro
188 Abalgin
15577 Abalgin
188 Abalgin
61193 Abalgin

I am a complete novice. Do you have any suggestions?

Best,
Terry