Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1540to1544
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofilter über VBA mit variablen Kriterium

Autofilter über VBA mit variablen Kriterium
08.02.2017 20:15:12
mail@kopperth.de
Hallo zusammen,
ich möchte gerne in VBA einen Autofilter erstellen, bei welchem ich im Criteria1 eine Variable übergeben könnte.
so funktioniert es:
Sheets(TabellenblattQuelle).Range("$B$1:$L$1").AutoFilter Field:=11, Criteria1:=Array("verschrottet 2013", "verschrottet 2014"), Operator:=xlFilterValues
die Auswahl der Jahre soll aber variabel sein und ich habe das dann so versucht,
das funktioniert aber nicht, es werden keine Daten gefiltert...
Sheets(TabellenblattQuelle).Range("$B$1:$L$1").AutoFilter Field:=11, Criteria1:=Array(Kriterium), Operator:=xlFilterValues
Hinter der Variable Kriterium verbirgt sich der Text:
"verschrottet 2013", "verschrottet 2014", "verschrottet 2015"
zumindestens wird mir das mit debug.print im Direktfesnter angezeigt, die Variable Kriterium ist als Variant deklariert.
Hätte hier jemnad eine Idee?
Vielen Dank schon mal für Eure Unterstützung!

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter über VBA mit variablen Kriterium
08.02.2017 20:47:02
Luschi
Hallo mail@kopperth.de
so klappt das bei mir:
Criteria1:=Split(Kriterium, ",", -1, vbTextCompare)
Gruß von Luschi
aus klein-Paris
AW: Autofilter über VBA mit variablen Kriterium
08.02.2017 20:54:36
mail@kopperth.de
Ja das klappt so! Da wäre vermutlich nie draufgekommen...
Also nochmals vielen herzlichen Dank und SG!!!
AW: Autofilter über VBA mit variablen Kriterium
08.02.2017 21:06:11
fcs
Hallöchen,
wenn die Filterwerte als Liste (getrennt durch eine Trennzeichen) in der Variablen vorliegen, dann kann man mit der Funktion Split ein Array mit den Filterwerten als Kriterium im Autofilter generieren.
Sind die Filterwerte jeweils in Anführungszeichen gesetzt, dann müssen diese vor dem Splitten durch leerstrings ersetzt werden.
LG
Franz 
Sub aatest()
'1. funktioniere Form für Kriterium mit Trennzeichen Komma
Kriterium = "verschrottet 2013,verschrottet 2014,verschrottet 2015"
'2. Filter-Werte stehen in der Form "verschrottet 2013", "verschrottet 2014", "verschrottet  _
2015" _
in der Variablen
'Beispielzeile, um Kriterium entsprechend zusammenzubasteln
Kriterium = """verschrottet 2013"", ""verschrottet 2014"", ""verschrottet 2015"""
'Anführungszeichen durch Leerstring ersetzen
Kriterium = Replace(Kriterium, """", "")
TabellenblattQuelle = "Tabelle2" 'testzeile
Sheets(TabellenblattQuelle).Range("$B$1:$L$1").AutoFilter Field:=11, _
Criteria1:=Split(Kriterium, ","), Operator:=xlFilterValues
End Sub

Anzeige
AW: Autofilter über VBA mit variablen Kriterium
08.02.2017 21:47:16
mail@kopperth.de
Servus Franz,
vielen herzlichen Dank für deine Unterstützung, der Filter läuft jetzt optimal!
Danke und SG Holger

8 Forumthreads zu ähnlichen Themen

Autofilter, Variablentyp in Criteria bei Zahlen?
Sören

Hallo,ich habe ein kleines Problem mit dem Autofilter. Ich möchte eine Tabelle nach einem Feld das Zahlen enthält filtern. Folgendes liefert aber leider immer nichts, also eine leere Autofilter-Liste:Ich gebe in dem Textfeld (txtFilterMSNStart) eine Zahl ein und möchte füttere Criteria1 mit ">=...
20.06.2002 14:15:36
Thread-ID: 130182
2 Beiträge
Anzeige
VBA Filter Array
Tom

Hallo,
ich habe ein Tabellenblatt (Tabelle3)
In den Zellen B5 bis B12 findet eine Auswahl statt aktiv/nicht aktiv
Ist z.B. B5 aktiv so soll C5 als Filterkriterium aktiviert werden.
Weiterhin sollen alle Zeilen mit einem x in Spalte AA angezeigt werden (fixes Filterkriterium)
07.11.2013 15:50:30
Thread-ID: 1337547
3 Beiträge
VBA - Filter setzen mit Arrays
Ole

Hallo zusammen,
ich komme an einer Stelle nicht weiter und bitte deswegen um Hilfe.
Ich habe eine Spalte, in die Termine eingetragen werden. Es werden manchmal auch Dummy-Termine eingetragen, falls ein Termin noch nicht feststeht.
Ich möchte die Spalte Filtern: es sollen keine
...
25.01.2017 18:33:55
Thread-ID: 1537370
3 Beiträge
Anzeige
Variable Spalte in Autofilter über VBA
stormlamp

Hallo,
mit dem Code
ActiveSheet.Range("$A$2:$Z$305").AutoFilter Field:=8, Criteria1:=""
wird genau die 8. Spalte gefiltert.
Wie müsste der Code lauten, wenn immer in der gerade aktuellen Spalte gefiltert wird, also so etwas wie "Field:=Spalte()"
Viele Grüße
Hans
04.06.2019 17:14:12
Thread-ID: 1696051
3 Beiträge
VBA und Range bei AutoFilter
r3wDy

Hi!
Ich hab da ein kleines Problem mit VBA und excel. Un zwar: Ich geh in meinem Macro immer alle markierten zeilen durch mit
for each c in target...
Das funktioniert auch wunderbar, nur wenn ich die tabelle mit autofilter sortiert habe bekomme ich die falschen ranges. ich markiere...
10.12.2004 12:10:36
Thread-ID: 531065
10 Beiträge
VBA Autofilter Criteria2 Array
Alen

Hallo!
Ich habe eine Liste, wo ich in der Spalte F nach dem Datum Filtern kann.
Ich filtere grundsätzlich nur nach Monate.
Wenn ich meine Schritte mit dem Makro aufzeichne erhalte ich folgendes Ergebnis: ActiveSheet.Range("$C$12:$AE$3000").AutoFilter Field:=6, Operator:= _ xlFilte...
26.08.2020 16:34:06
Thread-ID: 1778973
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
2
2
2
2
9
3