that will save me a lot of time ;-)

If you want to manage this within a VBA-solution, this piece of code would be a good starting point:

Sub RemoveDupes()

Range("RANGE").AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=Range("NEWRANGE"), _
Unique:=True

End Sub

Two notes:
- Replace RANGE with the original range you want to remove duplicates from
- Replace NEWRANGE with the range you want to copy the new duplicate-free content to

I have struggled with this problem quite some time so the post from Bastien come just in time to mention my findings :-)

Phil