Array aus Bereich für Autofilter
12.09.2024 13:37:47
PeTeR
ich habe mit Arrays leider zu wenig Ahnung und bitte deshalb um eure Unterstützung:
Ich möchte per VBA max. 4 Länder in einer Liste (z.B. A1:A500) filtern. Die Länder sind variabel z.B. im Bereich "Z100:Z103"
1) Lösung mit 3 festen Ländern funktioniert:
ActiveSheet.Range("$A$1:$A$500").AutoFilter Field:=1, Criteria1:=Array("DE", "AT", "CH"), Operator:=xlFilterValues
2) Lösung mit einer Variablen funktioniert:
Länder = Array("NTR", "VZW", "CH")
ActiveSheet.Range("$A$1:$A$500").AutoFilter Field:=1, Criteria1:=Länder, Operator:=xlFilterValues
Ich bin auf der Suche nach folgender Lösung:
Länder = Array(Range("Z100:Z103"))
ActiveSheet.Range("$A$1:$A$500").AutoFilter Field:=1, Criteria1:=Länder, Operator:=xlFilterValues
Vielen Dank für eure Anregungen!
VG
PeTeR
Anzeige