Filter
13.02.2004 10:00:48
Werner Meyer
mit folgendem Makro kann ich nach Ausdrücken suchen und gleichzeitig filtern.
Sub Suche_usage()
Dim Eingabe As String
Eingabe = InputBox("Keyword")
Selection.AutoFilter Field:=2, Criteria1:="=*" & Eingabe & "*", Operator:=xlAnd
End Sub
Leider werden nur die ersten 255 Zeichen gefunden. Ist das gesuchte Wort dahinter aufgeführt, wird es nicht gefunden und somit auch nicht gefiltert.
Gibt es hier eine praktikable Lösung?
Vielen Dank
Werner Meyer