PDA

Vollständige Version anzeigen : Filter


grumi_40
07.04.2013, 14:07
Hallo!

Habe in einem Formular mit VBAeinen Filter eingebaut.

If Forms!frmMenü!Unterformular.Form.cboZeit.Value > 0 Then
If strFilterkette <> "" Then strFilterkette = strFilterkette & " and "
strFilterkette = strFilterkette & "[datZeit] = " & Format(Forms!frmMenü!Unterformular.Form.cboZeit.Value, "hh:mm") & ""
End If

If Forms!frmMenü!Unterformular.Form.cboDatum.Value > 0 Then
If strFilterkette <> "" Then strFilterkette = strFilterkette & " and "
strFilterkette = strFilterkette & "[datDatum] = " & CDbl(CDate(Forms!frmMenü!Unterformular.Form.cboDatum.Value))
End If

Der Filter mit dem Datum funktioniert, der mit der Zeit nicht.
Wähle über ein Kombifeld den Wert für die Zeit aus z.B. 10:00 und übergebe diesen in den Filter. Bekomme Fehler 3075 "fehlender Operator".

LG Grumi

ebs17
07.04.2013, 14:19
Mit der gezeigten Formatanweisung erzeugst Du einen String, allerdings einen, mit dem SQL nichts anfangen kann, vergleiche auch Datum an SQL-String übergeben (http://www.donkarl.com?FAQ6.8).

Verstanden im Sinne von als Zeit interpretierbar werden nur bestimmte amerikanische oder ISO-Formate, wie z.B.
Format(Zeitfeld, "#hh:nn:ss#")

Lanz Rudolf
07.04.2013, 17:48
Hallo
evtl hilft Dir auch das aus meiner Doc s. Fusszeile Unten Rechts
Lies folgendes
ab Seite 76
5.3.13 Where-Bedingung mit BuildCriteria erstelle
ab Seite 293
10.20.23 Kriterien für Datum Vergleich (Filter) mit BuildCriteria erstellen

ich verwende zum erstellen der Kriterien für FILTER oder Wehre öffters Buildcriterid :)