XL 2016 Ecrire semaine du temps au temps par rapport au numero de semaine

Mimi

XLDnaute Occasionnel
Bonjour à tous,
Je cherche à savoir comment écrire la formule suivante :
Dans la cellule A3 N° de semaine : 40 = dans la cellule B3 Lundi 30 septembre 2019 au Dimanche 6 Octobre 2019
D'avance je vous remercie
Michel
 

Staple1600

XLDnaute Barbatruc
Bonjour le fil, Michel

Une possibilité
="Du "&TEXTE(DATE(ANNEE(AUJOURDHUI());1;-2)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;3))+A3*7;"jjjj jj mmmm aaaa")&" au "&TEXTE(DATE(ANNEE(AUJOURDHUI());1;-2)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;3))+(A3*7)+6;"jjjj jj mmmm aaaa")
PS: test OK sur mon PC (avec un numéro de semaine en A3)
 

Staple1600

XLDnaute Barbatruc
Re

Pour simplifier la chose, on peut aussi nommer la formule
Testes cette petite macro sur un classeur vierge
VB:
Sub Macro1()
Range("A2").FormulaR1C1 = "=YEAR(TODAY())"
Range("A3") = "40"
ActiveWorkbook.Names.Add Name:="pLundi", RefersToR1C1:= _
"=MAX(DATE(Feuil1!R2C1,1,1),DATE(Feuil1!R2C1,1,1)-WEEKDAY(DATE(Feuil1!R2C1,1,1),2)+(Feuil1!R3C1-1)*7+1)"
Range("B3").FormulaR1C1 = _
"=""Du ""&TEXT(pLundi,""jjjj jj mmmm aaaa"")&"" au ""&TEXT(pLundi+6,""jjjj jj mmmm aaaaa"")"
End Sub
Une fois la macro exécutée, regarde les formules en A2 et en B3
Puis fais CTRL+F3 pour voir à quoi correspond pLundi
 

Mimi

XLDnaute Occasionnel
Oui j'en apprends tous les jours grâce à des personnes comme toi qui prennent du temps pour aider des novices comme moi.
Par contre devant lundi dans la formule il y a un "p" sa veut dire quoi c'est pour la formule en VBA ??
Encore merci
Michel
 

Discussions similaires

Réponses
4
Affichages
406

Statistiques des forums

Discussions
312 185
Messages
2 086 018
Membres
103 094
dernier inscrit
Molinari