Autofilter

Forumthread: Autofilter
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Autofilter

Autofilter

18.09.2003 17:43:54

andreas

hallo leute,
ich habe eine excel adressenliste und möchte mit der autofilter funktion nach mehreren postleitzahlen suchen. mit zwei plz ist es ja kein problem, aber mit mehreren?
kann mir jemand helfen.

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Autofilter

18.09.2003 20:58:33

Beni

AW: Autofilter

18.09.2003 20:58:33

Beni

Hallo Andreas,
ich habe das anderst gelöst, wenn ich meinem Fall in A1 klicke, erscheint eine InputBox,
ich gebe die ersten Zeichen ein und wird es entsprechend gefilter, wenn nichts eingeben wird, erscheint wieder alles, kopiere diesen Code in das Modul von der Tabelle und passe entsprechen an.
Gruss Beni


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Makro von Bernhard Mächler
If Target.Column = 1 And Target.Row = 1 Then ' anpassen
Dim Suchbegriff
Titel = "Autofilter"
Mldg = "Suchbegriff eingeben"
Suchbegriff = InputBox(Mldg, Titel)
If Worksheets("Tabelle1").FilterMode = False Then [A1:H1].Autofilter ' anpassen
[A1].Autofilter Field:=1, Criteria1:=Suchbegriff & "*" ' anpassen
End If
End Sub

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