OVH Cloud OVH Cloud

Dates période glissante

2 réponses
Avatar
loutox
Bonjour à tous,

en vue de comparer des resultats sur des périodes glissantes, je souhaite
etablir une fonction VBA ayant pour parametre une date.

Voici le resultat désiré :
en tapant une date D1(par exemple 3 mars 05), je cherche à obtenir :
Les bornes D1Debut et D1Fin qui délimitent les 12 derniers mois complets
finissant à la fin du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2004 et D1Fin le 31
mars 2005)

à partir de D1, je souhaite aussi obtenir les bornes D0Debut et D0Fin qui
délimitent les 12 mois précédant le début du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2003 et D1Fin le 31
mars 2004)

Je vais y bosser avec les fonctions de dates, mais si un renseignement me
permettait ne ne pas réinventer la roue ça serait agréable.

Certains outils comme crystal report doivent faire cela plus facilement,
mais je prefere rester sur du 100% access pour des raisons de déploiement.

merci et à bientot
Loutox.

2 réponses

Avatar
Raymond [mvp]
Bonsoir.

tu calcules la date du dernier jour du mois , tu rajoute 1 jour et tu
rajoutes 12 mois -1jour
pour l'année passée tu fais le contraire.
http://officesystem.access.free.fr/vba/mois.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"loutox" a écrit dans le message de news:
42403f7c$0$30457$
Bonjour à tous,

en vue de comparer des resultats sur des périodes glissantes, je souhaite
etablir une fonction VBA ayant pour parametre une date.

Voici le resultat désiré :
en tapant une date D1(par exemple 3 mars 05), je cherche à obtenir :
Les bornes D1Debut et D1Fin qui délimitent les 12 derniers mois complets
finissant à la fin du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2004 et D1Fin le
31 mars 2005)

à partir de D1, je souhaite aussi obtenir les bornes D0Debut et D0Fin qui
délimitent les 12 mois précédant le début du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2003 et D1Fin le
31 mars 2004)

Je vais y bosser avec les fonctions de dates, mais si un renseignement me
permettait ne ne pas réinventer la roue ça serait agréable.

Certains outils comme crystal report doivent faire cela plus facilement,
mais je prefere rester sur du 100% access pour des raisons de déploiement.

merci et à bientot
Loutox.



Avatar
loutox
merci et bonne journée.

"Raymond [mvp]" a écrit dans le message de
news:
Bonsoir.

tu calcules la date du dernier jour du mois , tu rajoute 1 jour et tu
rajoutes 12 mois -1jour
pour l'année passée tu fais le contraire.
http://officesystem.access.free.fr/vba/mois.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"loutox" a écrit dans le message de news:
42403f7c$0$30457$
Bonjour à tous,

en vue de comparer des resultats sur des périodes glissantes, je souhaite
etablir une fonction VBA ayant pour parametre une date.

Voici le resultat désiré :
en tapant une date D1(par exemple 3 mars 05), je cherche à obtenir :
Les bornes D1Debut et D1Fin qui délimitent les 12 derniers mois complets
finissant à la fin du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2004 et D1Fin le
31 mars 2005)

à partir de D1, je souhaite aussi obtenir les bornes D0Debut et D0Fin qui
délimitent les 12 mois précédant le début du mois de D1
(si D1 est le 3 mars 2005, D1Debut devra etre le 1 avril 2003 et D1Fin le
31 mars 2004)

Je vais y bosser avec les fonctions de dates, mais si un renseignement me
permettait ne ne pas réinventer la roue ça serait agréable.

Certains outils comme crystal report doivent faire cela plus facilement,
mais je prefere rester sur du 100% access pour des raisons de
déploiement.

merci et à bientot
Loutox.