Excell 2003 Advanced Filter Unique Items

Hello,
I am using the Advanced Filter to identify the unique items from four columns and paste into four new columns on the same tab.
The problem is that the first filtered unique item is being repeated as the last filtered unique item. Obviously I don't want any item to be repeated. What is causing this and how do I correct it.

Side note:
The Advanced Filter function is part of a simple macro that consolidates the information from 13 different tabs onto this one tab where the Advanced Filter then grabs only the unique items and copies them into new columns. The macro is doing everything that it should be doing, but the filter results are not 100%.

Here is the code for the filter command within the macro:
Range("A2:D7800").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _
"F2:I7800"), Unique:=True