Comparing lines and removing duplicates

Hello.
I am writing some VBA to compare 2 lines and remove the duplicate.
Here's how i have it set up.

The spreadsheet will pull in data from a data base.
There are 2 queries, the first query's data is not colored, the second query's data is colored with vb color #17.
The program sorts by customer number.
There is a possibility of duplicates from each query.
Thats why i have them colored so i can compare the two lines, if an uncolored line matches a colored line, it needs to remove the colored line.

Here's the code i am using. For some reason its not removing all the correct lines. its removing more than what i need somehow and i'm not sure where i'm going wrong. Please advise.

Please Login or Register  to view this content.