I want to remove duplicates from my selection, but this line gives me a 1004 error:
ActiveSheet.Range(\"B3\", Range(\"B3\").End(xlDown)).RemoveDuplicates Col
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