Autofilter Code

Forumthread: Autofilter Code

Autofilter Code

15.04.2005 00:10:27

Jahn

hallo Excel User, suche im folgenden Code die möglichkeit, die suche ohne das "*" immer eingeben zu müssen.Am besten wäre es man könnte es nicht Löschen oder selektieren so dass man nur Buchstaben eingeben muss.


Private Sub TextBox1_Change()
Worksheets("Artikel").Range("D2").AutoFilter _
Field:=1, Criteria1:=TextBox1.Value
ActiveWindow.ScrollRow = 1
End Sub

danke für eure Hilfe

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Autofilter Code

15.04.2005 00:15:12

Herbert

AW: Autofilter Code

15.04.2005 00:15:12

Herbert


Private Sub TextBox1_Change()
Worksheets("Artikel").Range("D2").AutoFilter _
Field:=1, Criteria1:= "*" & TextBox1.Value
ActiveWindow.ScrollRow = 1
End Sub

mfg Herbert

Forumthread: Autofilter Code

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread