Filter in Zelle eingeben

[McFly148]

Hallo zusammen,

gibt es die Möglichkeit, dass ich einen Filter in einer Zelle eintippe?

Beispiel: In Spalte A stehen Namen, in A1 ist ein Filter - alles was ich in A1 eintippe, wird dann darunter gefiltert

Tippe ich Meier ein, werden mir alle Meier´s in Spalte angezeigt.

Danke für eure Antworten

[MisterBurns]

Das geht schon, aber wieso sollte man das aufwändig programmieren, wenn es der Autofilter standardmäßig kann?

[McFly148]

ich habe ca. 5000 Zeilen (wachsend) und benötige ca. 120 Abfragen pro Tag. Da wird die Suche immer komplizierter...

[WillWissen]

Hi,

du suchst bestimmt so etwas:

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B	C	D	E
1	Namen	HS		Suche	Gefunden
2	Meier			mann	Eiermann
3	Maier				Amann
4	Müller
5	Eiermann	5
6	Möller
7	Müll
8	Olli
9	Mayerhofer
10	Amann	10
11	Böller
12	Eisenhut
13	Hochdorfer
14	Angermeier
15
16
17
18
19
20

Zelle	Formel
B2	=WENNFEHLER(VERGLEICH("*"&$D$2&"*";A2;0)+ZEILE()-1;"")
E2	=WENNFEHLER(INDEX(A:A;KKLEINSTE($B$2:$B$20;ZEILE(A1)));"")

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

Es reicht, bekannte Teile des Namens einzugeben - je weniger Teile bekannt sind, umso mehr Namen werden genannt (und natürlich auch umgekehrt). Die grün hinterlegte Hilfsspalte blendest du einfach aus. Mein Vorschlag funktioniert natürlich auch in formatierten Tabellen - dann brauchst du keine Formeln vorhalten; sie werden automatisch erweitert.

[MisterBurns]

Die Anzahl der Zeilen sind dem Autofilter egal, auch ob täglich Zeilen dazukommen.
Und ob ich 120 mal am Tag in Zelle A1 was eingebe oder in das Suchfeld des Autofilters, finde ich persönlich auch nicht so relevant. Aber vielleicht reicht dir ja schon Günters Lösung.

[McFly148]

Danke  :19:

[WillWissen]

Hi Berni,

ich benutze auch nur meine Formellösung in großen Bereichen. Es ist (abgesehen von der einmaligen Einrichtung) erheblich schneller zum Ziel zu gelangen. Beim Autofilter muss ich erst einmal 3 Klicks ausführen (Filterpfeil / Textfilter / enthält), bis ich Teile des gesuchten Begriffs eingeben kann. Um danach wieder die komplette Liste zu sehen, muss ich entweder zum Menü Daten, um die Filterung aufzuheben oder wieder über den Filterpfeil gehen, um die Filterauswahl zu löschen. Das alles entfällt bei der Formellösung.

[MisterBurns]

Kein Thema, jeder wie er mag. Für mich trotzdem nicht nachvollziehbar :)

[Kuwer]

Hallo McFly148,

automatisch geht das nur per VBA. Dazu müsstest Du folgenden Code in das schon bestehende VBA-Modul des entsprechenden Tabellenblatts einfügen:

Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Address = "$A$1" Then

    With Target.CurrentRegion

      If Target.Value = "" Then

        .AutoFilter Field:=1, VisibleDropDown:=False

      Else

        .AutoFilter Field:=1, Criteria1:=Target.Value & "*", VisibleDropDown:=False

      End If

    End With

    Target.Select

  End If

End Sub

Gruß Uwe

[McFly148]

Danke  :19:

Ich versuche es mal.

---

Mit dem Auto Filter geht es auch. Aber die Geschwindigkeit ist ein Faktor für mich.