Makro zum Kopieren bestimmter Werte von einem Excel-Arbeitsblatt in ein anderes

Ich habe eine Excel-Arbeitsmappe, die die folgenden Blätter "Main" und "Count" enthält: Jetzt hat das Blatt "Main" die Spalte B mit der Liste der IDs.

Ist es möglich, ein Makro auf der Seite "Anzahl" zu haben, um alle unterschiedlichen Werte in Spalte A von Spalte B im Hauptblatt zu kopieren?

Ich weiß, dass die Indexfunktion und der erweiterte Filter funktionieren, aber ich benötige speziell ein einfaches Makro.

Versuche dies:

Sub CopyUnique()
    Dim s1 As Worksheet, s2 As Worksheet
    Set s1 = Sheets("Main")
    Set s2 = Sheets("Count")
    s1.Range("B:B").Copy s2.Range("A1")
    s2.Range("A:A").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub