Unikatliste zeigt nicht korrekt an
04.05.2019 15:35:55
Fred
Hallo Excel-Profis,
ich habe ein Problem mit einer erstellten "Unikatsliste".
der code:
LZ_1 = Sheets("Kriterien").Cells(Rows.Count, 1).End(xlUp).Row + 1
LZ_2 = Sheets("Basis").Cells(Rows.Count, 1).End(xlUp).Row + 1
Sheets("Kriterien").Range("A2:A" & LZ_1).ClearContents
Sheets("Basis").Range("F2:F" & LZ_2).AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Sheets("Kriterien").Range("A2"), Unique:=True
die Unikatliste zeigt nicht korrekt an.Kann mal jemand drauf schauen?
Gruß
Fred
https://www.herber.de/bbs/user/129575.xlsb