Autofilter Operator
28.02.2007 18:40:03
Christoph
über einen Suchbutton wird ein Autofilter ausgeführt. Allerdings soll der Autofilter bei Ausführung nicht "entspricht" anwenden sondern "enthält". Mit dem Operator:=xlAnd wird jedoch immer "entspricht" als Kriterium genommen. Wie kann ich das lösen, dass immer "enthält" als Filterkriterium benutzt wird?
Anbei mein Code:
Private Sub StartSearch_Click()
Dim keyword As String
keyword = Range("D4").Value
Selection.AutoFilter Field:=3, Criteria1:=keyword, Operator:=xlAnd
End Sub
Grüsse
Christoph
Anzeige