I would suggest you make a module for deleting duplicates - call this SUB after you exported data;
or you can add the code after the 'export code' .
try this first on a separate sheet - always make a copy of your work.
hope this can help.
thanks..
Sub DelDupes()
Sheets("Sheet1").Select
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
Sheets("Sheet1").Range("A1:P" & lastrow).RemoveDuplicates _
Columns:=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16), Header:=xlYes
End Sub
the above code is for up to Column P - number 16th column
the reason for Array(1... 16)
you can change those two together with the Sheet Name to suit..