Updated workbook attached. I had to make a few minor changes to the macro because your file has content other than just the data rows. I also added a progress report that appears on the status bar. To run the macro press Alt-F8 select 'DeleteDuplicates', then OK.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|