Vielen Dank, das mit den ungefähren Textwerten funktioniert schon mal :)
Ich habe das mit den ungefähren Zahlenwerten (+/-10) auch mit dem Makro Rekorder aufgezeichnet bekomme es aber anscheinend nicht hin, meinen Code dann richtig zu maipulieren dass er das macht, was ich möchte. Der Wert ist auch nicht immer 100 sondern hängt wie die Textwerte auch von der zugehörigen Zelle auf dem Suchformular ab. Optimal wäre es auch, wenn ich den +/- Wert in dem Suchformular auch manuell begrenzen könnte, da es auch mal Werte unter 10 geben wird.
der Makro Rekorder hat das hier ausgespuckt:
Sub Makro6()
' Makro6 Makro
ActiveSheet.ListObjects("Datenbank").Range.AutoFilter Field:=13, Criteria1:="<=110", Operator:=xlOr, Criteria2:=">=90"
End Sub
Bei dem Select Case funktioniert das Makro nur noch, wenn ich es bei dem ersten Suchbefehl eingebe. Wenn ich beim zweiten oder mehreren Suchbefehlen den Case Befehl anwende filtert es mir beim Ausführen des Makros immer in der Lieferanten Zeile, egal wo ich einen Wert eingebe :(
|