Nach Kriterium über zwei Spalten Filtern
Wolfango
folgendes Makro habe ich vor einiger Zeit mit Hilfe dieses Forums erstellen können:
Sub Filtern_nach_Personen()
Dim Kriterium As String
Kriterium = InputBox("Filtern nach (enthält)", "Filtereingabe")
Selection.AutoFilter Field:=17, Criteria1:="=*" & Kriterium & "*"
ActiveWindow.LargeScroll Down:=-2000
End Sub
Das Makro funktioniert einwandfrei und ermöglicht es, ein Filterkriterium in eine Dialogbox einzugeben, nach welchem dann in Spalte 'Q' gefiltert wird (ich vermute die 17 im Code steht für Spalte Q?)
Dieses Makro würde ich gerne derart abändern, dass Datensätze gefiltert werden wenn das Suchkriterium in Spalte 'Q' ODER in Spalte 'R' gefunden wird.
Ich vermute, das lässt sich machen?
Besten Dank!
Gruß,
Wo.