Date Decaler

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


Message édité par psyconetone le 12-11-2007 à 15:33:45
Reply

Marsh Posté le 12-11-2007 à 15:31:49   

Reply

Marsh Posté le 12-11-2007 à 18:27:59    

la fonction weekday prend une date en paramètre, pas un jour

Reply

Marsh Posté le 13-11-2007 à 08:50:58    

Ok ça marche merci boucoups Devil_k


Message édité par psyconetone le 13-11-2007 à 08:51:23
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed