Trouver la date de jeudi prochain

Résolu
lolito_balmito Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -  
lolito_balmito Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je souhaite trouver une fonction qui me permette de trouver la date de jeudi (ou d'un autre jour) prochain. En VBA ou en formule excel ?

Merci d'avance de votre aide
Laurent
A voir également:

5 réponses

lolito_balmito Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   1
 
En fait je souhaite trouver une formule (ou macro) qui me donne (quelque que soit le jour de la semaine) la date du prochain jeudi.
Exemple aujourd'hui il me propose (comme me le propose Acid_, mais je n'ai pas trouvé sa formule ;-) ) le 22 août et vendredi (23 août) il me proposera le 29 août.
1
Yoda
 
Bonjour,

essaye cette macro en modifiant le jour

Sub test()
madate = #8/20/2013# ' format anglais
'madate = Now
j = Weekday(madate, vbMonday)
If j < 4 Then
   n = 4 - j
Else
   n = j - 4 + 7
End If
   MsgBox "Jeudi prochain : " & madate + n
End Sub
0
benol3 Messages postés 570 Date d'inscription   Statut Membre Dernière intervention   87
 
Bonjour,

il suffit d'ajouter 7 à une date donnée.

Par exemple, si dans la cellule A1 tu a 01/02/2013 tape en A2 : =A1+7 et tu obtiendras 08/02/2013

En esperant t'avoir aidé :)

Cordialement,

Benol3
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,

par formule :
=AUJOURDHUI()+MOD(11-JOURSEM(AUJOURDHUI();2);7)

et si tu désires avoir le jour même si on est un jeudi :
=AUJOURDHUI()+MOD(12-JOURSEM(AUJOURDHUI()+1;2);7)

eric
0
lolito_balmito Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour,

Merci pour votre aide, vos exemples et reflexions m'ont aidés ...
En fait, j'ai complexifié ma demande, à partir d'une date, je voulais connaître le prochain jeudi ou le prochain mardi, voici la formule que j'ai mise en place :

Ma date est en I2
=SI(ET(JOURSEM(I2)<6;JOURSEM(I2)>2);I2+(3-JOURSEM(I2));SI(JOURSEM(I2)>5;I2+(6-JOURSEM(I2));I2+(-1-JOURSEM(I2))))

Ca marche nickel
Laurent
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Acid_ Messages postés 503 Date d'inscription   Statut Membre Dernière intervention   159
 
Bonjour,

Le prochain Jeudi sera le 22 aout.
-1
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,
Pas du tout, ça sera le 29.
eric
0