Lundi de la semaine 1 à partir de l'année

[rodge5895]

Bonjour,
Quel serait la formule permettant de trouver la date du lundi de la semaine 1 en ne renseignant seulement que l'année 😕😕

Ex :
si j'indique 2015 en A1 la formule de A2 indiquerait : 29/12/2014 🙂

p/info :le 29/12/2014 est le lundi de la semaine 1 de l'année 2015
(S1 est à cheval sur l'année 2014 -3j-et 2015 -4j-)
Merci pour votre aide
Rodge

 

[Guest]

Re : Lundi de la semaine 1 à partir de l'année

Bonjour,

Ce n'est pas les discussions sur le sujet qui manquent sur le forum, comme la flemme de faire des recherches, ne serait-ce que regarder dans les discussions similaires en bas de cette page!

A+

 

[ROGER2327]

Re : Lundi de la semaine 1 à partir de l'année

Bonjour rodge5895.

Sujet mille fois traité !

De mémoire :​

=SI(A1="";"";DATE(A1;1;A1<>1900)+7*(MOD(DATE(A1;1;6);7)>3)-MOD(DATE(A1;1;6);7))

ℝOGER2327
#7256

Jeudi 26 Clinamen 141 (Saint Escargot, sybarite - fête Suprême Quarte)
28 Germinal An CCXXII, 5,5532h - pensée
2014-W16-4T13:19:39Z


P.s. : Bonjour Hasco.

 

[néné06]

Re : Lundi de la semaine 1 à partir de l'année

Bonsoir Roger,Hasco,Rodge et à tous,

Voici des exemples si tu travail en VBA !

Lien supprimé

A+

René

 

[néné06]

Re : Lundi de la semaine 1 à partir de l'année

Re,

J'ai placé la fonction qui donne lea date du premier lundi d'une année.


Function date_pre_lun_annee(Annee_test As Integer) As Date
Annee_test = Monannee
For i = CDate("01/01/" & Annee_test) To CDate("07/01/" & Annee_test)
If Weekday(i) = 5 Then date_pre_lun_annee = i - 3: Exit Function
Next i
End Function

Ici , la ligne du programme qui renvoie à la fonction.
date_pre_lun_annee (Monannee)

A+

René