Supportnet / Forum / Datenbanken
Alter als Kriterium in Abfrage
Frage
Hallo,
meine Abfrage mag mich nicht! :-(
Feld in Abfrage: Alter: WieAlt([Geburtstag])
Das Alter wird richtig angezeigt.
[code]
Folgende Funktion liegt dahinter:
Public Function WieAlt(Geburtsdatum As Date) As Variant
WieAlt = DateDiff("yyyy", Geburtsdatum, Date) + (Format(Date, "mmdd") < Format(Geburtsdatum, "mmdd"))
End Function [/code]
Wenn ich aber z.B. manuell als Kriterium > 33 oder ähnlich Eingebe erscheint :
[code]
Data type mismatch in criteria expression ! [/code]
Die Abfrage soll als Grundlage für eine Anfügeabfrage dienen, das Kriterium z.B. > 33 and < 45 will ich später über globale Funktionen von außen steuerbar machen.
Bin für jeden Tipp dankbar.
Gruß Herbert
Antwort 1 von Nicolas
mal
As Integer
statt
As Variant
als Rückgabedatentyp versucht? Hab grade kein access da ums mal zu testen.
Aber Int mit Int zu vergleichen sollte dann gehen.
As Integer
statt
As Variant
als Rückgabedatentyp versucht? Hab grade kein access da ums mal zu testen.
Aber Int mit Int zu vergleichen sollte dann gehen.
Antwort 2 von Herbert
Hallo Nicolas,
>As Integer
>statt
>As Variant
bringt leider auch:
"Data type mismatch in criteria expression !"
Bin als Kriterium auf das etwas ungenauere:
Jahr([vstamm].[geburtstag])=1970
ausgewichen.
Jedenfalls Danke für Deinen Tipp.
Gruß Herbert
>As Integer
>statt
>As Variant
bringt leider auch:
"Data type mismatch in criteria expression !"
Bin als Kriterium auf das etwas ungenauere:
Jahr([vstamm].[geburtstag])=1970
ausgewichen.
Jedenfalls Danke für Deinen Tipp.
Gruß Herbert