Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Afficher l'age d'une personne

Afficher l'age d'une personne

10 réponses
Avatar
manu
Bonjour =E0 tous,

j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifi=E9s par le=20
nom ,prenom, date de naissance, et je voudrais dans mon=20
formulaire que l'age des patient s'affiche automatiquement=20
en fonction de son ann=E9e de naissance???
Je pense qu'il faut passer par le gen=E9rateur d'expression=20
mais je ne sais pas trop en fait...
merci de votre aide
a+

manu
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel Carollo
Bonjour Manu!

Voyez l'aide ne ligne sur la fonction DateDiff, ca devrait vous aider a
demarrer.

--
Daniel :-)

Computing Technologies International - www.computing-tech.com - We
provide solutions...

"manu" wrote in message
news:0bba01c39d39$00261ba0$
Bonjour à tous,

j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche automatiquement
en fonction de son année de naissance???
Je pense qu'il faut passer par le genérateur d'expression
mais je ne sais pas trop en fait...
merci de votre aide
a+

manu
Avatar
3stone
Salut,

"manu"
j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche automatiquement
en fonction de son année de naissance???


Regarde ceci :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm#ageHabitant


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Merci bien, mais c'est un peu compliqué ...

moi j'ai essayé avec le générateur d'expression:
Dans mon formulaire j'ai ajouter une zone de texte avec la
formule suivante mais ça ne fonctionne pas???
=DiffDate("yyyy", [Datedenaissance, [Maintenant()])

si vous pouvez me débloquer????
merci
manu


-----Message d'origine-----
Salut,

"manu"
j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche automatiquement
en fonction de son année de naissance???


Regarde ceci :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm#ageHabi
tant



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------




.



Avatar
Gaël Schmitt
Bonjour,

Effectue un copier coller du code, fournie par 3stone, dans un module.
Sauvegarde le module.
dans ton formulaire écris la formule suivante :
=Agehabitant([dateNaissance])

Normalement cela devrai fonctionner.
Gael.


a écrit dans le message de
news:0c2b01c39d5e$dc5aa300$

Merci bien, mais c'est un peu compliqué ...

moi j'ai essayé avec le générateur d'expression:
Dans mon formulaire j'ai ajouter une zone de texte avec la
formule suivante mais ça ne fonctionne pas???
=DiffDate("yyyy", [Datedenaissance, [Maintenant()])

si vous pouvez me débloquer????
merci
manu


-----Message d'origine-----
Salut,

"manu"
j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche automatiquement
en fonction de son année de naissance???


Regarde ceci :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm#ageHabi
tant



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------




.



Avatar
3stone
Salut,

Merci bien, mais c'est un peu compliqué ...


Mais non, mais non...


moi j'ai essayé avec le générateur d'expression:
Dans mon formulaire j'ai ajouter une zone de texte avec la
formule suivante mais ça ne fonctionne pas???
=DiffDate("yyyy", [Datedenaissance, [Maintenant()])


ce serait: =DiffDate("yyyy"; [Datedenaissance]; Date())

Mais, tu peux obtenir des erreurs d'un an!


Colle plutôt cette fonction dans un module général (onglet "Module")
et sauve-le sous le nom de "modAge".

Function fAge(varDateNaiss As Date) As Integer
If IsNull(varDateNaiss) Then fAge = 0: Exit Function
fAge = DateDiff("YYYY", varDateNaiss, Date) + (DateSerial(Year(Date), Month(varDateNaiss), Day(varDateNaiss)) >
Date)
End Function

et là ou tu as besoin de renseigner l'age de la personne dans un champ, tu mets:

= fAge([DateNaissance])

et dans une requête tu mets:

Age: fAge([DateNaissance])


Simple, non ?


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------

Avatar
Gaël Schmitt
Il faut que tu affectes le nom de la fonction.
Dans le cas du code fournis par le site de 3stone utilise
=Agehabitant([dateNaissance]).

Gael

a écrit dans le message de
news:0d4101c39d6b$3b7f0ef0$
merci je commence à comprendre...ça à l air trop fort
access

et en fait dans le code du module , il faut que je
remplace vardatenaiss par le nom de mon champ que j'ai mis
dans mes tables pour saisir la date de naissance, moi je
l'ai appelé DateNaissance et je rajoute un var devant???

Par contre y a juste un truc que je ne comprends pas à la
fin c'est que je dois renseigner:
= fAge([DateNaissance])

Et ce nom là je l'ai nul part????je ne vois comment je
fais le lien vers le module???

merci d'avance

manu

-----Message d'origine-----
Bonjour,

Effectue un copier coller du code, fournie par 3stone,
dans un module.

Sauvegarde le module.
dans ton formulaire écris la formule suivante :
=Agehabitant([dateNaissance])

Normalement cela devrai fonctionner.
Gael.


a écrit dans le
message de

news:0c2b01c39d5e$dc5aa300$

Merci bien, mais c'est un peu compliqué ...

moi j'ai essayé avec le générateur d'expression:
Dans mon formulaire j'ai ajouter une zone de texte avec la
formule suivante mais ça ne fonctionne pas???
=DiffDate("yyyy", [Datedenaissance, [Maintenant()])

si vous pouvez me débloquer????
merci
manu


-----Message d'origine-----
Salut,

"manu"
j'ai une ptite question assez simple sur Access je pense,
en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche
automatiquement


en fonction de son année de naissance???


Regarde ceci :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm#ageHab
i


tant


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------




.




.




Avatar
j'ai trouvé !
ça marche génial!!!
merci à tous les 2

manu

-----Message d'origine-----
Il faut que tu affectes le nom de la fonction.
Dans le cas du code fournis par le site de 3stone utilise
=Agehabitant([dateNaissance]).

Gael

a écrit dans le
message de

news:0d4101c39d6b$3b7f0ef0$
merci je commence à comprendre...ça à l air trop fort
access

et en fait dans le code du module , il faut que je
remplace vardatenaiss par le nom de mon champ que j'ai mis
dans mes tables pour saisir la date de naissance, moi je
l'ai appelé DateNaissance et je rajoute un var devant???

Par contre y a juste un truc que je ne comprends pas à la
fin c'est que je dois renseigner:
= fAge([DateNaissance])

Et ce nom là je l'ai nul part????je ne vois comment je
fais le lien vers le module???

merci d'avance

manu

-----Message d'origine-----
Bonjour,

Effectue un copier coller du code, fournie par 3stone,
dans un module.

Sauvegarde le module.
dans ton formulaire écris la formule suivante :
=Agehabitant([dateNaissance])

Normalement cela devrai fonctionner.
Gael.


a écrit dans le
message de

news:0c2b01c39d5e$dc5aa300$

Merci bien, mais c'est un peu compliqué ...

moi j'ai essayé avec le générateur d'expression:
Dans mon formulaire j'ai ajouter une zone de texte avec
la


formule suivante mais ça ne fonctionne pas???
=DiffDate("yyyy", [Datedenaissance, [Maintenant()])

si vous pouvez me débloquer????
merci
manu


-----Message d'origine-----
Salut,

"manu"
j'ai une ptite question assez simple sur Access je
pense,



en fait j'ai des patients qui son identifiés par le
nom ,prenom, date de naissance, et je voudrais dans mon
formulaire que l'age des patient s'affiche
automatiquement


en fonction de son année de naissance???


Regarde ceci :
http://mypage.bluewin.ch/w.stucki/CalculsDates.htm#ageHa
b



i
tant


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------




.




.




.





Avatar
3stone
Salut,

merci je commence à comprendre...ça à l air trop fort access


A condition de bien lire les messages... ;-))


Par contre y a juste un truc que je ne comprends pas à la
fin c'est que je dois renseigner:
= fAge([DateNaissance])

Et ce nom là je l'ai nul part????je ne vois comment je
fais le lien vers le module???



Dans mon second message, je t'avais simplifier la fonction...
Et j'ai l'habitude de préfixer les noms de fonction par un "f"
Cela facilite la lecture des mois après, et évite certaine erreur.

Mais, tu as eu la réponse de Gaël.


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------

Avatar
Gaël Schmitt
Merci aussi au site que tu as trouvé.
Il est très interessant.

Gael

"3stone" a écrit dans le message de
news:3f9e98c7$0$16245$
Salut,

merci je commence à comprendre...ça à l air trop fort access


A condition de bien lire les messages... ;-))


Par contre y a juste un truc que je ne comprends pas à la
fin c'est que je dois renseigner:
= fAge([DateNaissance])

Et ce nom là je l'ai nul part????je ne vois comment je
fais le lien vers le module???



Dans mon second message, je t'avais simplifier la fonction...
Et j'ai l'habitude de préfixer les noms de fonction par un "f"
Cela facilite la lecture des mois après, et évite certaine erreur.

Mais, tu as eu la réponse de Gaël.


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------






Avatar
3stone
Bonjour Gaël,

"Gaël Schmitt"
| Merci aussi au site que tu as trouvé.
| Il est très interessant.


Il pense qu'il est dans les favoris de nous tous ici...
Une véritable mine pour pas mal de sujets... et les date, math en particulier.


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------