Suchfunktion
14.12.2004 22:27:53
Markus
ich bräuchte bitte eine Hilfestellung.
Problem: Ich habe eine Excel-Tabelle mit aktiviertem Filter. Damit ich beim Filtern das Dropdown-menu nicht verwenden muss, habe ich mit dem Steuerelement-Toolbox ein Textfenster plaziert und folgende VBA-Anweisung ergänzt:
Private Sub TextBox2_Change()
Selection.AutoFilter Field:=6, Criteria1:="=" & Me.TextBox2 & "*", Operator:=xlAnd
End Sub
So kann ich direkt in dem Fenster meinen Suchbegriff eingeben und es wird sofort nach diesem Begriff gefiltert.
FRAGE: Bei der VBA-Anweisung wird nur im Feld 6 sprich Spalte F gefiltert.
Wie könnte ich den Filter auch auf andere Spalten ausweiten so das mit ein und demselben Suchfenster 5 od. 10 Spalten durchsucht bzw. gefiltert werden.
WARUM: Ich habe eine Artikelliste mit 10 Suchkriterien erweitert.
Z.Bsp. Schrittmotor, HLSM, 4018, 24VDV, Nanotec usw. Ich möchte mit nur bei einem Suchfenster einen x-beliebigen Suchbegriff eingeben und wenn dieser spezielle Beriff in einem dieser Spalten vorhanden ist, die ganze Zeile angezeigt bekommen.
Vielleicht kann mir einer dabei Helfen.
Vielen Dank im Voraus.
Gruß Markus