Office: Filtern nach Wert in Zellinhalt

Hallo.

In der angehängten Datei habe ich in "E2" ein Auswahlfeld.

Abhängig von diesem Feld möchte ich, daß die Tabelle automatisch nach den Einträgen in den Zellen "F6" bis "F14" gefiltert wird.

Also sobald ich im Auswahlfeld A, B, oder C angebe soll die Datei automatisch gefilter werden.

Kann mir hier jemand helfen.

Datei ist unter Excel 2016 erstellt.

Danke im Voraus

 

Hola,
warum nimmst du nicht einfach den Autofilter?
Gruß,
steve1da

 

Danke für die Info.

Aber der macht das dann doch auch nicht von selbst. Oder wie meinst Du, daß ich das damit bewerkstellige?

 

Du musst halt das Filterkriterium immer anklicken.
Alternativ:
=WENNFEHLER(INDEX(A$6:A$14;AGGREGAT(15;6;ZEILE($A$6:$A$14)-5/(ISTZAHL(SUCHEN($E$2;$F$6:$F$14)));ZEILE(A1)));"")

 

OK. Und wo setze ich diese Formel rein?

Sorry, klingt vielleicht doof aber ich bin nicht fit im Excel.

 

Da wo du das Ergebnis erwartest. Wenn die Liste an gleicher Stelle gefiltert werden soll, nimm den Autofilter.

 

Danke für Deine Hilfe.

Meine Vorstellung ist, daß bei Änderung in "E2" automatisch gefiltert wird.

Vielleicht kann das mit einem Makro geschehen.

Mal sehen, vielleicht hat ja jemand noch andere Vorschläge. Aber wie gesagt. Vielen Dank.

 

Hi,

hast du schon mal den Autofilter in Betracht gezogen?
Ansonsten gibt es bei aktuellem Excel die FILTER()-Funktion. Die kann allerdings nur an anderer Stelle Filtern...

 

Sorry, war ein paar Tage mal weg.

Ja, Autofilter habe ich mir angesehen, aber das muss man jedes mal selber aktiv werden.

Ich hätte gerne ein Makro, das bei Auswahl in E2 automatisch filtert.

 

Und wo ist der Unterschied ob ich in E2 etwas auswähle oder mit dem Autofilter? Mal ganz davon abgesehen, dass man die Auswahlmöglichkeiten in E2 auch erst einmal definieren muss…

 

Hi,

folgenden Code ins Codemodul des Tabellenblattes:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address(0, 0) = "E2" Then
        If Not ActiveSheet.AutoFilterMode Then Range("A5").CurrentRegion.AutoFilter
        If Target <> "" Then
            Range("A5").AutoFilter field:=6, Criteria1:=Target
        Else
            Range("A5").AutoFilter field:=6
        End If
    End If
End Sub

---

 

Hallo Beverly.

Herzlichen Dank. das ist im Prinzip genau das, was ich gemeint habe.

Aber wenn ich in "E6" die Auswahl "A" anzeige müsste es mir auch die Zeilen anzeigen, bei denen A und B steht, oder A und C, also die Zeilen 9, 11,12 und 13.

 

Auswahlfeld "E6" meine ich natürlich.

 

Bin schon ganz blöd. Natürlich "E2"

 

Hi,

in E6 gibt es kein Auswahlfeld.

Und du hast immer noch nicht beantwortet, weshalb eine Auswahl in E2 etwas anderes sein soll, als eine Auswahl im Autofilter.

Im Übrigen macht der Code von Karin nichts anderes, als den Autofilter per Makro auf den Wert in E2 zu setzen. Bisher war noch nie die rede davon, dass auch "A+B" bei Auswahl von "A" angezeigt werden soll. Wenn du das möchtest, ist aber auch das mit dem Autofilter kein Problem.

Und wenn du es unbedingt unsinniger Weise als Makro haben willst, dann starte den Makrorekorder, stelle den Autofilter händisch und schau, was aufgezeichnet wurde. Entsprechend kannst du dann das Makro anpassen. Du schaffst das nicht? Dann frage ich mich, wieso du dich so auf Makros versteifst ohne diese dann Pflegen zu können.