VBA und Spezialfilter
24.05.2018 17:10:16
Josupei
bin der Neue :-).
Ich versuche grade mich mit bescheidenen VBA Kenntnissen mit Excel und Erweiterten Filtern rumzuschlagen per Makroaufzeichnung.
Ziel soll es sein aus einer "Maximal Liste" per Sortierung nach Anwendervorgaben eine differenzierte Liste zu erhalten.
Ich habe den Zeilen in der "Maximal Liste" in Spalte A Nummern (Ganzzahlen) verpasst, nach denen ich filtern möchte, (Optionen haben unterschiedliche Nummern und sollen so rausgefiltert werden.)
Wenn ich händisch filtere passt das Ergebnis wie gewünscht, wenn ich das aufgezeichnete Makro verwende, wird nicht gefiltert.
Vielleicht hat jemand einen Tipp für mich?
Hier der code:
Sub NachweisKompakt()
' NachweisKompakt Makro
' Kopiert die unter NachweisAuswahl ausgewählten Prüfoptionen in die Tabelle Nachweisausgabe
Sheets("NachweisAusgabe").Select
Sheets("NachweisKompakt").Columns("A:D").AdvancedFilter Action:=xlFilterCopy _
, CriteriaRange:=Sheets("NachweisAuswahl").Columns("E:H"), CopyToRange:= _
Range("A1"), Unique:=False
End Sub
Gruß
Josupei