code not working - remove repeated lines

The attached spreadsheet contains 17,754 rows and when the following macro is run over sheet("NOIM") it is reduced to 3,895 by a combination of removing rows from column "A" that contain the code 7618 and also by removing any other rows that re repeated as far as info kept in col"B" is concerned.

Our problem is that rows 601 & 1465 ELECTROSURGICAL APPARATUS:* LIGASURE SMALL JAW;18.8cm;28deg;(COVIDIEN #LF1212)

and

2531 & 2552 KIT,HERNIA:* LAPAROSCOPIC;(TYCO #K6097);FOR MR CHEN

remain behind. Technically only 601 and 2531 should remain. Can anyone provide a reason why the macro is NOT working across these two rows? Is it to do with the '*' wildcard?

Is there a better way of running the part of the macro that leave only the unique entries? The data is presented int he spreadsheet below. I hope I havent ballsed it up this time and it actually posts!

thanks you