RemoveDuplicates gives 1004 error

问题

I want to remove duplicates from my selection, but this line gives me a 1004 error:

ActiveSheet.Range("B3", Range("B3").End(xlDown)).RemoveDuplicates Columns:=2, Header:=xlNo

How do I fix this?

回答1:

Change your line into:

ActiveSheet.Range(range("B3"), Range("B3").End(xlDown)).RemoveDuplicates Columns:=1, Header:=xlNo

or,if you really have 2 columns into:

ActiveSheet.Range(range("B3"), Range("C3").End(xlDown)).RemoveDuplicates Columns:=2, Header:=xlNo

来源：https://stackoverflow.com/questions/15929896/removeduplicates-gives-1004-error