Find duplicates from a column and copy to another worksheet

[chrisellis250]

Hello,

On one worksheet I have a number of rows of data of schools, town names, colleges, companies etc in column D.

I need to create a macro which finds the duplicates in the column and copies them into row A on "Sheet2".

An added extra would be for this data in "Sheet2" to be sorted by the number of duplicates. I.e. if ASDA features 15 times this would show up at the top.

Can this be done?

Many thanks,

Chris

[walruseggman]

Please Login or Register  to view this content.

[chrisellis250]

Hello,

Many thanks for the response, much appreciated.

I have just put it to the test but it did not work, I got an error in the 4th row of code

For Each c In ws1.Columns(4).SpecialCells(2)


Any advice?


Many thanks

[walruseggman]

Is your first sheet actually named "Sheet1"? You need to change ws1 and ws2 to whatever your sheet names actually are. Like:

Please Login or Register  to view this content.

If that doesn't help, please attach a sample workbook that demonstrates the error.