Makro für Autofilter in Excel

Computer: Software & Programmierung Visual Basic
#1

Hallöchen,

ich möchte in einer Exceltabelle einen Autofilter setzen (kein Problem) und dazu ein Makro schreiben, welches die Tabelle nach einem Kriterium filtert, das ich in einer Zelle auswähle.

Mein Problem: normalerweise gebe ich ja in dem Makro für den Autofilter direkt das Filterkriterium ein. Wie kann ich dem Makro nun sagen, dass ich als Kriterium den Wert wähle, der in meiner Auswahlzelle steht?

Danke für Eure Hilfe

Michaela

Ist-Nicht-Gleich-Filterkriterium aus Zellinhalt
#2

Hallole,

in Deinem Makro hast Du sicher eine Zeile ähnlich wie

Selection.AutoFilter Field:=1, Criteria1:="Kriterium"

Ändere einfach den Criterial-Wert so ab:

Selection.AutoFilter Field:=1, Criteria1:=Selection.Text

Hattest Du das gemeint?

Gruß
(Woly)

#3

Hallöchen,

ich glaube, das meinte ich. Nur habe ich noch ein Problem: wenn es jetzt so aussieht:

Columns(„E:E“).Select
Selection.AutoFilter Field:=1, Criteria1:=Selection.Text

Wo sage ich ihm, dass er den Text aus z.B. Zelle „A1“ nehmen soll??

Danke
Micha

#4

Ok, auch nicht schwer :wink:

Selection.Text meint den Text aus der aktiven (selektierten) Zelle.

Möchtest Du stattdessen eine bestimmte Zelle ansprechen, geht das mit Range(„A2“).Text oder auch mit Cells(2,1).Text

Gruß
(Woly)

1 Like