Discussion :

[Liegecam64]

Bonjour
Tu as également la Faq:
http://access.developpez.com/faq/?page=dates#HowOld

Bonsoir
J'aide bénévolement une asbl à caractère social. Avec access 2007, j'ai créé une table "Usagers" comprenant un champ "Date_naissance". Je souhaite calculer l'âge via une requête. Pour ce faire j'utilise la requête SQL suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
SELECT Usagers
Function CalculAge(ByVal Date-naissance As Date, ByVal dateReference As Date) As Integer
If Month(dateReference) > Month(Date-naissance) Then
    CalculAge = DateDiff("yyyy", Date-naissance, dateReference)
ElseIf Month(dateReference) = Month(Date-naissance) Then
    If Day(dateReference) >= Day(Date-naissance) Then
        CalculAge = DateDiff("yyyy", Date-naissance, dateReference)
    Else
        CalculAge = DateDiff("yyyy", Date-naissance, dateReference) - 1
    End If
Else
    CalculAge = DateDiff("yyyy", Date-naissance, dateReference) - 1
End If
End Function
FROM Usagers;

Lorsque je reviens en mode feuille de données, j'obtiens le message suivant :
Dans l'instruction SELECT un mot réservé ou argument est mal orthographié ou absent, ou le ponctuation est incorrecte.

Pouvez-vous m'aider pour réussir ce calcul de l'âge.
Je vous remercie d'avance

[hyperion13]

Bonsoir,
La fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Function CalculAge(ByVal Date-naissance As Date, ByVal dateReference As Date) As Integer

l'avez-vous bien copier dans un Module d'Access ? Parce que vue votre syntaxe je dirais non. Le SELECT ... FROM qui encapsule la fonction, c'est pas bon !
Si non, Alt F11. En haut à gauche, une icône vous permettant d'insérer un "Module". Copier dans le module la fonction et enregistrer le module.
Créer ensuite une req ave la tbl usagers, insérer les champs nécessaires et le champ datenais. Dans un champ vide de votre req générer ou créer une expression (clic btn droit sur la ligne champ) Dans éléments développez Fonctions, cliquez sur le nom de votre bdd. Dans catégorie cliquez sur module1 et dans expression double-clic CalculAge. Renseignez les arguments de la fonction.

Voilà ce que cela doit donner normalement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT id_usager, nom_usager, datenais_usager, CalculAge([datenais_usager],Date()) AS Age
FROM usagers;

[Liegecam64]

Merci Hyperion 13. Grâce à ton aide je suis parvenu à le calcul de l'age des personnes faisant appel aux services de l'asbl à caractère social pour laquelle je suis un travailleur bénévole.
Encore merci et bonne journée.