Datumsfilter per VBA klemmt
24.04.2020 08:43:56
Georg
blicke mal wieder nixx, aber ihr könnt mir sicher helfen.
Ich will in einer Liste in Spalte 10 (Tagesdaten) den Filter auf "alles vor aktuellem Monat" setzen.
Das klappt prima, solange ich das Datum selber in den Code einsetze. Das klappt aber nicht mehr, wenn ich den Code flexibilisiere indem ich mit dem Code unten das Datum per Variable ermittele und dann einsetze. Ergebnis: die Liste ist komplett weggefiltert.
Wenn ich dann aber in den Filter schaue (Datumsfilter - vor - ist vor - korrektes Datum), steht dort alles richtig drin. Und erst wenn ich dann manuell auf "OK" gehe zeigt er das korrekte Filterergebnis, obwohl ich ja NICHTS am Filter geändert habe. Häää?
Sub Makro2()
Dim erstTagAktMon
erstTagAktMon = DateSerial(Year(Date), Month(Date), 1)
ActiveSheet.Range("$A$8:$CE$2225").AutoFilter Field:=10, Criteria1:="Danke und Gruß Georg