VBA: Datum im Autofilter funktioniert nicht

Dieses Thema VBA: Datum im Autofilter funktioniert nicht im Forum "Microsoft Office Suite" wurde erstellt von klexy, 14. Jan. 2012.

Thema: VBA: Datum im Autofilter funktioniert nicht Win XP, Excel97 Ab Zeile 5 beginnt die Tabelle, die ich filtern will, die Datumsspalte ist Spalte B. Das Zellformat...

  1. Win XP, Excel97

    Ab Zeile 5 beginnt die Tabelle, die ich filtern will, die Datumsspalte ist Spalte B. Das Zellformat ist TT.MM.JJ.
    In B2 ist das von-Datum und in C2 ist das bis-Datum vorgegeben.
    Ich will größer gleich von und kleiner gleich bis filtern.

    Code:
    Sub Filtern_nach_Datum()
    
    Dim von As Date, bis As Date
    von = Range(B2).Value
    bis = Range(C2).Value
    
    Selection.AutoFilter Field:=2, Criteria1:=>= & Format(von, dd.mm.yy), Operator:=xlAnd, Criteria2:=<= & Format(bis, dd.mm.yy)
    
    End Sub
    Warum funktioniert das nicht? Das Ergebnis sind Null gefilterte Zeilen.
    Wenn ich den benutzerdefinierten Filter per Mausklick aufrufe, stehen da die richtigen Werte drin. Wenn ich nach dem Anschauen den benutzerdefinierten Filter mit OK schließe, filtert es korrekt.

    Es funktioniert auch nicht wenn ich das Makro direkt per Makrorecorder aufgezeichnet habe:
    Code:
    Sub Filtern_direkt_nach_Datum()
    
    Selection.AutoFilter Field:=2, Criteria1:=>=03.01.12, Operator:=xlAnd, Criteria2:=<=07.01.12
    
    End Sub
     
  2. Hallo klexy,

    in der Datumsvergleichsangabe muß das Datum mit vierstelliger Jahreszahl angegeben werden.

    Code:
    Selection.AutoFilter Field:=2, Criteria1:=>= & Format(von, dd.mm.yyyy), Operator:=xlAnd, Criteria2:=<= & Format(bis, dd.mm.yyyy)
    
    Gruß Matjes :)
     
  3. Hallo Matjes,

    danke, geht aber auch nicht.

    Auch das nicht:
    Code:
    Selection.AutoFilter Field:=2, Criteria1:=>=03.01.2012, Operator:=xlAnd, Criteria2:=<=07.01.2012
    Aber heute nacht hab ich eine andere Variante geträumt und die funktioniert.:
    Code:
    Selection.AutoFilter Field:=2, Criteria1:=>= & Format(von, 0), Operator:=xlAnd, Criteria2:=<= & Format(bis, 0)
    Wunder der Technik.
     
Die Seite wird geladen...

VBA: Datum im Autofilter funktioniert nicht - Ähnliche Themen

Forum Datum
Uhrzeit und Datum aktualisieren sowie TrayAppMeldung löschen Windows 8 Forum 27. Juni 2015
Datum und Uhrzeit Windows 8 Forum 25. Juni 2015
Datei Erstellungsdatum als Beweis für Krankenkasse Datenwiederherstellung 24. Juni 2015
[Fehler] Datum/Typ in "Programme deinstallieren" fehlt Windows 8 Forum 28. Dez. 2014
LibreOffice Calc: Datum wird nicht richtig angezeigt nach Formatierung Windows XP Forum 26. Jan. 2013