Office: (Office 2016) Filter mit DTPicker per Makro

Moin,
in meiner Tabelle befindet sich in Spalte B das Datum und in den Spalten C bis E entsprechend zugehörige Daten.
Mit Hilfe zweier DTPicker möchte ich jetzt ein Start- und Enddatum für den Filter angeben können, sodass mir die dazwischenliegende Periode angezeigt wird.

Mein Code soweit:

Sub sDatum()
With ActiveSheet
If .AutoFilterMode Then
If .FilterMode Then .ShowAllData
End If

Range("B6:E6").AutoFilter Field:=1, Criteria1:=">=" & CDbl(DTPicker1.Value), Operator:=xlAnd, Criteria2:="<=" & CDbl(DTPicker2.Value)
End With
End Sub

Alternativ habe ich es auch mit 'CDbl(Range("A1")' oder nur mit 'DTPicker1.Value' probiert, bekomme aber immer einen Laufzeitfehler oder das Datum wird "falsch" in eine Zahl/String umgewandelt.

Ich hoffe ihr könnt mich in die richtige Richtung schubsen, danke schonmal

 

Moin!
Ungetestet, weil ich seit Jahren keine DT-Picker auf meinem System habe, weil sie nicht mehr offiziell sind.

Alle Strings, die per VBA an einen Parameter übergeben werden, sollten amerikanische Formate und Trennzeichen haben.

Probiere mal:

Code:

Criteria1:=">=" & Format(DTPicker1.Value, "yy/mm/dd")

Gruß Ralf

 

Am Datumsformat lag es nicht. Habe es entsprechend und auch mit unserem Datumsformat ausprobiert, der Fehler bleibt aber der gleiche.

Es kommt immer Laufzeitfehler 424 "Objekt erforderlich". Das hilft mir aber leider nicht weiter

 

Dann solltest Du mal die Datei hochladen.
Es könnte von jmd., der die MSCOMCTL.oxc registriert hat, überprüft werden.
Die Fehlermeldung (die Du in der Threaderöffnung gnädigerweise verheimlicht hast) deutet aber darauf hin, dass es kein Steuerelement mit diesem Namen gibt!

Gruß Ralf