Worksheets("Tabelle1").Range("B1:B200").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Worksheets("Tabelle1").Range("A1"), unique:=True
mit diesem Befehl machen ich eine Liste, in B die aus
a
a
a
b
c
c
c
d
d
e
f
besteht, eine Liste aller Elemente, die darin vorkommen, aber nur einmal (a,b,c,d,e,f). in A.
Jetzt habe ich folgendes Problem: Wenn am Anfang von B zweimal das gleiche vorkommt, wie hier oben, dann steht in Spalte A nicht a,b,c,d,e,f, sonder a,a,b,c,d,e etc.
Wenn also am Anfang zweimal in B ein Element steht, wird es zweimal kopiert. Das ist für die Anwendung, die ich brauche, ein Fehler.
Weiss jemand warum das so ist und was man dagegen tun kann.