Date Decaler - VB/VBA/VBS - Programmation
Marsh Posté le 12-11-2007 à 15:31:49
Bonjour
J'utilise la fonction Date() pour connaitre la date, ensuite le l'incrément de -1 pour avoir le debut de la semaine avec adddate()
DebutSemaine = date()DO WHILE WeekDay(DAY(DebutSemaine)) <> 2 '2 = Lundi DebutSemaine = DateAdd("d", -1, DebutSemaine)LOOP
Le probleme c'est que je suis decaler de 3 jours cad qu'il consider que le lundi = jeudi si quelqu'un pouvais m'aider svp
Marsh Posté le 12-11-2007 à 18:27:59
la fonction weekday prend une date en paramètre, pas un jour
Marsh Posté le 13-11-2007 à 08:50:58
Ok ça marche merci boucoups Devil_k
Make sure you enter the(*)required information where indicate.HTML code is not allowed
Marsh Posté le 12-11-2007 à 15:31:49
Bonjour
J'utilise la fonction Date() pour connaitre la date, ensuite le l'incrément de -1 pour avoir le debut de la semaine avec adddate()
DebutSemaine = date()
DO WHILE WeekDay(DAY(DebutSemaine)) <> 2 '2 = Lundi
DebutSemaine = DateAdd("d", -1, DebutSemaine)
LOOP
Le probleme c'est que je suis decaler de 3 jours cad qu'il consider que le lundi = jeudi si quelqu'un pouvais m'aider svp
Message édité par psyconetone le 12-11-2007 à 15:33:45