Recuperer le dernier lundi

Résolu
neophenix83 Messages postés 63 Date d'inscription samedi 9 avril 2005 Statut Membre Dernière intervention 4 mai 2007 - 15 sept. 2005 à 17:41
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 15 sept. 2005 à 17:58
Bonjour,



Je voudrais savoir s'il est possible, par macro sous excel, d'ecrire dans une cellule, la date du lundi qui vient d'avoir lieu.

Si on est lundi, je veux que ca ecrive ds une cellule la date du jour en cours.

Si on est pas lundi, je veux que ca ecrive la date du lundi precedant ds la cellule.



Est ce possible ? comment faire ?



D'avance merci

2 réponses

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 19
15 sept. 2005 à 17:58
Quoique devrait suffire :

MsgBox Date - Weekday(Date) + 2

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
3
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 19
15 sept. 2005 à 17:57
Salut,

Essaie d'adapter ça :
If Weekday(Date) <> 2 Then MsgBox Date - Weekday(Date) + 2

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
0