[Excel] Conversion date en n° semaine
Résolu
karaboudjan
Messages postés
45
Date d'inscription
Statut
Membre
Dernière intervention
-
S.Kumara -
S.Kumara -
Bonjour,
Je souhaite savoir s'il existe une formule sur Excel qui convertisse une date en un n° de semaine.
Par exemple, sur A1, j'ai la date du jour : 19/05/2008
Je voudrais sur B1, le numéro de semaine correspondant à A1, c'est-à-dire : 21
Si cette formulme existe, je suis preneur.
D'avance, je vous remercie pour vos réponses.
Karaboudjan.
Je souhaite savoir s'il existe une formule sur Excel qui convertisse une date en un n° de semaine.
Par exemple, sur A1, j'ai la date du jour : 19/05/2008
Je voudrais sur B1, le numéro de semaine correspondant à A1, c'est-à-dire : 21
Si cette formulme existe, je suis preneur.
D'avance, je vous remercie pour vos réponses.
Karaboudjan.
A voir également:
- Convertir jour en semaine excel
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Mise en forme conditionnelle excel - Guide
- Word et excel gratuit - Guide
- Mise a jour chrome - Accueil - Applications & Logiciels
3 réponses
Salut!
avec excel 2000 et inferieur essaye ceci:
=ENT(MOD(ENT((A1-2)/7)+0,6;52+5/28))+1
cela devrais faire ton bonheur!!
avec excel 2000 et inferieur essaye ceci:
=ENT(MOD(ENT((A1-2)/7)+0,6;52+5/28))+1
cela devrais faire ton bonheur!!
azer
bravo, c'est vraiment ce que je cherche
Brahim
trop bien!
pascaleg28
merci c'est super !
Amine
Merci :) mais sur Excel 2003/2007 ça ne fonctionne pas ! t'aurais pas une autre solution (excel en Anglais :p)
compta
mais si cela fonctionne sur excel 2007 il faut juste changer la virgule de 0,6 par le point du clavier numérique. bonne chance
Merci beaucoup à tous. Vos deux réponses fonctionnent. Celle de freddv et nevio.
J'ai réussi à trouver sur un site cette macro suivante qui donne le même résultat (excel-downloads.com) :
J'ai réussi à trouver sur un site cette macro suivante qui donne le même résultat (excel-downloads.com) :
Function CLSC(Dates As Date) As Integer Dim Semaine As Integer Semaine = Int((Dates - DateSerial(Year(Dates), 1, 1) + _ ((Weekday(DateSerial(Year(Dates), 1, 1)) + 1) _ Mod 7) - 3) / 7) + 1 If Semaine = 0 Then Semaine = CLSC(DateSerial(Year(Dates) - 1, 12, 31)) ElseIf Semaine = 53 And (Weekday(DateSerial(Year(Dates), 12, 31)) - 1) _ Mod 7 <= 3 Then Semaine = 1 End If CLSC = Semaine End Function