Hi.

Try this macro code:

removeduplicates.xlsm