OVH Cloud OVH Cloud

Calcul pour obtenir des mois

12 réponses
Avatar
John
Bonsoir,

Comment calculer l'âge d'animaux en mois ?

1 mois
3 mois
6 mois
18 mois
24 mois
36 mois etc d'aprés une date donnée et leur date de naissance.

Merci.

--
John.

2 réponses

1 2
Avatar
John
Merci à vous deux,

J'ai copier cette formule et je l'ai collée dans un champ de requête mais ça
ne fonctionne pas.

AgeÚteDiff("yyyy", [Bdate], Now())+ _
Int( Format(now(), "mmdd") < Format( [Bdate], "mmdd") )
J'ai remplacé les "," par ";" mais rien n'a faire, vous avez une idée ?

Merci.
--
John.



Tu peux t'inspirer de ce qui suit:
http://www.mvps.org/accessfr/datetime/date0001.htm

Willi2004 a écrit:
| Ensuite en prenant 30 jours pour un mois, tu divises le nombre de
| jours obtenu par 30 et tu obtiens un résultat du genre: Age = x mois
| y jours.
|
| 3stone a écrit:
|| Salut,
||
|| "John"
||| Mais comme Willi2004 l'a dit il devrait s'inscrire 5 jours et non un
||| mois, donc comment écrire la formule pour que le résultat soit
||| précis ?
||
||
|| Dans ce cas, remplace le "M" par un "D" et tu obtiendras des jours...





Avatar
3stone
Salut,

"John"
| J'ai copier cette formule et je l'ai collée dans un champ de requête mais ça
| ne fonctionne pas.
|
| AgeÚteDiff("yyyy", [Bdate], Now())+ _
| Int( Format(now(), "mmdd") < Format( [Bdate], "mmdd") )
| J'ai remplacé les "," par ";" mais rien n'a faire, vous avez une idée ?


Lorsque tu quitte l'éditeur VBA, c'est le cas lorsque tu dois saisir
des ";" à la place des virgules, tu dois également penser à traduire
les chaînes transmisent en paramètres ;-(

Ainsi, format(Bdate;"mmdd") devient format(Bdate;"mmjj")

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
MPFA: http://www.mpfa.info/ (infos générales)
1 2