Interessant. Grösser/Kleiner funktioniert bei Deiner Datei nicht.
Was aber funktioniert, ist folgendes:
Tabelle18.Range("A1").AutoFilter Field:=1, Criteria1:="<=" & Format("01.11.2023", "MM-DD-YYYY")