Gruppe
Allgemein
Problem
Wie kann ich auf Schaltflächendruck eine Tabelle nach Min-/MaxDatum filtern? Start- und Enddatum stehen in zwei Zellen.
StandardModule: basMain
Sub Filtern()
Range("A1").Select
Selection.AutoFilter Field:=8, Criteria1:=">" & _
CDbl(DateValue(Range("Datum1").Text)), Operator:=xlAnd, _
Criteria2:="<" & CDbl(DateValue(Range("Datum2").Text))
End Sub