The folloiwng macro is intended to look at a list of numbers in column "M"
and copy unique records only to column "B".
But I'm still getting duplication in column "B".

Macro:
Sub Macro1()

' copy unique Work Order numbers to columb "B"
Range("M6:M200").AdvancedFilter Action:=xlFilterCopy,
CopyToRange:=Range( _
"B6"), Unique:=True

End Sub

column "M"
73369
73369
73369
75817
75817

results in column "B"
73369
73369
75817