Dropdown Rückgabewert für Autofilter verwenden
Hallo,
ich lass mir in einem Dropdown die Werte aus Spalte 7 anzeigen. Ich sehe die Namen aus Spalte 6.
Nach Auswahl eines Namen möchte ich die Tabelle per VBA nach diesem Wert sortieren. Bei der Formatierung des Steuerelements lasse ich mir den Wert in Z3 ausgeben. Dort steht dann eine 1 oder eben die andere dem Namen entsprechende Ziffer.
ActiveSheet.ListObjects("Tabelle1").Range.AutoFilter Field:=7, Criteria1:=Z3, Operator:=xlAnd
Mit dieser Formel komme ich nicht weiter :-)
Danke !
Antwort schreiben
Antwort 1 von coros vom 27.09.2022, 04:39 Options
Hallo tannex,
schau mal auf
meiner HP in der
Rubrik Beispieldateien und dort dann in dem
Beispiel 34 (Listen und Kombinationsfeld aus Symbolleiste Formular) nach. Dort stelle ich dazu eine Beispieldatei zur Verfügung, die Dir sicherlich helfen wird.
Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von tannex vom 27.09.2022, 07:00 Options
Hallo Oliver,
nicht schlecht, aber so weit bin ich mit einer Bereich.Verschieben Formel gekommen.
Das Problem ist nun, das in meiner Zelle Z3 der "NAME" steht und ich die Tabelle in Spalte 7 genau nach diesem "Namen" sortiert haben möchte.
In deinem Beispiel wäre es jetzt so, das du eine dritte Tabelle hättest, in welcher der Wochentrag mehrmals vorkommt, und du nach Auswahl eines Tages diese automatisch sortiert haben möchtest (also den Autofilter automatisiert).
Danke und Gruß,
tannex
Antwort 3 von coros vom 27.09.2022, 08:24 Options
Hallo tannex,
ohne Deine Datei zu kennen, würde ich sagen es müsste wie folgt gehen:
ActiveSheet.ListObjects("Tabelle1").Range.AutoFilter Field:=7, Criteria1:=Range("Z3"), Operator:=xlAnd
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 4 von tannex vom 27.09.2022, 14:33 Options
Hallo Oliver,
die Formel bei mir war falsch.
Es musste RANGE ("Z3") rein ..
Jetzt klappt es wunderbar - SUPER !!!!
DANKE !!!
tannex