Hallo zusammen,

ich habe wiedermal ein Problem. Ich habe einen Filter kreiert, der sich durch die Eingabe in mehrere Textfelder auf einem Formular zusammenbauen lässt. Wenn ich nun aber den Filter anwenden möchte kommt die Fehlermeldung: Laufzeitfehler 3464: Datentypen in Kriterienausdruck unverträglich. Mein code ist:

Option Compare Database

Private Sub Filter2_setzen()

Dim DatVon As Date
Dim DatBis As Date
Dim Filterbedingung2 As String

If Not IsNull(Me!Bearbeiter) Then
If Filterbedingung2 <> "" Then
Filterbedingung2 = Filterbedingung2 & " AND "
End If
Filterbedingung2 = Filterbedingung2 & "Bearbeiter = " _
& Chr(34) & Me!Bearbeiter & Chr(34)
End If

If Not IsNull(Me!DatVon) Then
If Filterbedingung2 <> "" Then
Filterbedingung2 = Filterbedingung2 & " AND "
End If
Filterbedingung2 = Filterbedingung2 & "eingangsdatum >= " _
& Chr(34) & Me!DatVon & Chr(34)
End If

If Not IsNull(Me!DatBis) Then
If Filterbedingung2 <> "" Then
Filterbedingung2 = Filterbedingung2 & " AND "
End If
Filterbedingung2 = Filterbedingung2 & "eingangsdatum <= " _
& Chr(34) & Me!DatBis & Chr(34)
End If


Me.Filter = Filterbedingung2
Me.FilterOn = True

End Sub

Private Sub Bearbeiter_AfterUpdate()
Call Filter2_setzen
End Sub

Private Sub DatVon_AfterUpdate()
Call Filter2_setzen
End Sub

Private Sub DatBis_AfterUpdate()
Call Filter2_setzen
End Sub

Ich denk mal man muss die Textfelder als Datum deklarieren. Aber ich hab da keine Ahnung wie des funktioniert. Ich bin im VBA ein rechter Anfänger.
Der Filter soll durch die beiden Textfelder DatVon bzw. DatBis mehrerer Daten(Datums) vergleichen. Das Steuerelement ist in der Tabelle als Datum/Uhrzeit definiert.