Hallo zusammen,
Ich brauche eure Hilfe. :)
Ich möchte nämlich einen Autofilter für eine Spalte einwenden, die Datum im Format "jjjj/mm/tt" hat. Probleme sind:
- Excel erkennt diese Spalte als String und nicht als Datum
- der Filter kommt aus einer Zelle und wird als Datum erkannt.
Hier ist mein VBA code:
1 2 3 4 5 6 7 8 | DateD0 = CDate (wbMacro.Sheets(1).Cells(2, 5).Value)
DateD7 = CDate (wbMacro.Sheets(1).Cells(2, 7).Value)
With wbFinalWorkbook.Sheets(1)
.AutoFilterMode = False
.Range( "A1:J1" ).AutoFilter
.Range( "A1:J1" ).AutoFilter Field:=3, Criteria1:= ">=" & DateD0, Operator:=xlAnd, Criteria2:= "<=" & DateD7
End With
|
Egal ob ich DateD0 = wbMacro.Sheets(1).Cells(2, 5).Value schreibe, oder ob ich die Datenquelle formatiere ( wbFinalWorkbook.Sheets(1).Range("C2", "C50000").NumberFormat = YYYY/MM/DD )
In allen Fällen erkennt Excel das Datum nicht, sodass er nicht korrekt filetern kann. (Es gibt keine Beobachtungen mehr in der Datei...)
Habt ihr eine Idee, woran es liegen kann?
Danke im Voraus! Joanna
|