Zeilen nach Einträgen filtern
Joni
ich bin auf der Suche nach einer Lösung für folgendes Problem.
Ich habe eine Liste mit Datensätzen und möchte diese über die Eingabe von Werten "in Echtzeit" filtern. Dies funktioniert mit dem Spezialfilter und folgendem Makro.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 3 Then
Cells(7, 1).CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, _
CriteriaRange:=Range(Cells(2, 1), Cells(3, Columns.Count).End(xlToLeft)), Unique:=False
End If
End Sub
Ich hätte aber gerne, dass
1. auch Werte angezeigt werden, die nicht mit dem Suchtext beginnen sondern in enthalten (z. B. Tag findet auch Montag, Dienstag,..)
2. der Filter gleichzeitig in mehreren Spalten sucht und das Ergebnis anzeigt wenn in einer der Spalten ein übereinstimmender Wert gefunden wird (z. b. test findet Spalte A Zeitung Spalte B Papier Spalte C Attest und diese Zeile wird dann angezeigt).
Ich hoffe meine Beschreibung war verständlich. Ist dies in der Umsetzung möglich?
Danke für euer Infos.
Gruß Joni