Convertir un date en semaine

[Vanhelsing]

Bonjour

je souhaite créer une formule qui me permet de retourner une date (format /jj/mm/aaaa) en format semaine exemple : 31/07/2007 en S31).
si vous avez une astuce, merci d'avance

merci d'avance.

 

[JYLL]

Re : Convertir un date en semaine

Bonsoir Vanhelsing et le Forum,

Voir la formule suivante cela devrait faire l'affaire:

=ENT((S31-SOMME(MOD(DATE(ANNEE(S31-MOD(S31-2;7)+3);1;2);{1E+99;7})*{1;-1})+5)/7)

Bon test.

 

[Vanhelsing]

Re : Convertir un date en semaine

merci j essaie la formule de suite
Amicalement

Benoit

 

[JCGL]

Re : Convertir un date en semaine

Bonjour à tous,
Salut JYLL 🙂

Une formule de Monique, je crois,

=ENT(MOD(ENT((S31-2+(JOUR(1)=2)*6)/7)+0.6+((JOUR(1)=2)*208);52+5/28))+1

A+

 

[Staple1600]

Re : Convertir un date en semaine

Re


Juste pour vous dire (amicalement) (j'ai bien relu)

que S31 n'est pas la référence d'une cellule

mais ce que doit retourner la formule si dans une cellule la date
est :31/07/2007

S31= Semaine 31

-->JCGL (bonjour)
j'ai modifié +0.6 (en +0,6) (J'utilise la virgule - XL200)

 

[Vanhelsing]

Re : Convertir un date en semaine

La formule fonctionne
merci pour le coup de main.

j ai change les references et ça marche

 

[JCGL]

Re : Convertir un date en semaine

Re,
Salut Staple 🙂 ,

Effectivement...
Donc remplacé S31 par la date source et mettre au format personnalisé "S"00

A+

 

[kiki29]

Re : Convertir un date en semaine

Function NumSemaine(ddate As Date) As String
  NumSemaine = "S" & Format(ddate, "ww", vbMonday, vbFirstFourDays)
End Function

 

[JYLL]

Re : Convertir un date en semaine

Re Bonjour JCGL et le Forum,😉

Merci de me donner le nom de l'auteur, je l'avais mise de côté en la trouvant sur un fil du Forum, mais je n'en connaissait pas l'auteur.

Pour les formule de ce style c'est très souvent à Monique que nous les devons. Je te salue MONIQUE et te remercie pour tout et tous. J'espère que le soleil est revenu au dessus de Saint Brieuc, mais même absent, tu brilles toujours dans le Forum et jamais le soleil nous manque.🙂

Bonne journée à tous et ce soir je m'endormirai moins ignorant. Merci.

 

[Monique]

Re : Convertir un date en semaine

Bonjour,

Merci du compliment mais…
je n'y suis pour rien
C'est une formule de (je crois) Laurent Longre

Au départ, c'était ça :
=ENT(MOD(ENT((C2-2)/7)+0,6;52+5/28))+1
Mais cette formule donne une erreur, certaines années, avec le calendrier 1904
Jean-Marie et moi, on l'a modifiée pour qu'elle fonctionne, que l'on soit sur Mac ou PC et, sur PC, que soit ou non cochée l'option "Calendrier depuis 1904"

Avec le calendrier 1904, le 01-01-1900 n'existe pas, alors ça a donné ça :
=ENT(MOD(ENT((C2-2+ESTERREUR("1/1/1900"+0)*6)/7)+0,6+(ESTERREUR("1/1/1900"+0)*208);52+5/28))+1
Plus court :
=ENT(MOD(ENT((C2-2+ESTERR("1/1/1900")*6)/7)+0,6+(ESTERR("1/1/1900"+0)*208);52+5/28))+1
=ENT(MOD(ENT((C2-2+ESTERR("1/")*6)/7)+0,6+(ESTERR("1/"+0)*208);52+5/28))+1

Avec le calendrier 1904, le 1er jour est le samedi 02-01-1904, donc joursem = 7, ça peut donner :
=ENT(MOD(ENT((C2-2+(JOURSEM(1)=7)*6)/7)+0,6+((JOURSEM(1)=7)*208);52+5/28))+1

Avec le calendrier 1904, si on tape le chiffre 1 dans une cellule au format date, on obtient 02-01-1904, donc Jour(1) = 2, alors on fait plus court :
=ENT(MOD(ENT((C2-2+(JOUR(1)=2)*6)/7)+0,6+((JOUR(1)=2)*208);52+5/28))+1