Ich habe eine Tabelle, in der in der ersten Spalte Daten mit Datumsangaben stehen. Wie kann ich z.B. die Daten zwischen dem 1.1.2002 bis 1.5.2002 herausfiltern und in eine neue Tabelle einfügen? Die Eingabe der zu filternden Daten sollen über ein Dialogfeld eingegeben werden.
Ich hab es so schon einmal probiert, aber die Variable "Anfang" wird nicht in den Filter übernommen.
Sub Statistiken()
Dim Anfang As String
Worksheets("Eingabetabelle").Activate
Anfang = Range("G69")
Ende = Range("H69")
Worksheets("Buchungen").Activate
Range("A1:M500").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=">Anfang", Operator:=xlAnd _
, Criteria2:="