[Excel] Conversion date en n° semaine

Résolu
karaboudjan Messages postés 45 Statut Membre -  
 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.
Configuration: Windows 2000
Internet Explorer 6.0

3 réponses

  1. nevio Messages postés 24 Statut Membre 30
     
    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!!
    32
    1. azer
       
      bravo, c'est vraiment ce que je cherche
      0
    2. Brahim
       
      trop bien!
      0
    3. pascaleg28
       
      merci c'est super !
      0
    4. Amine
       
      Merci :) mais sur Excel 2003/2007 ça ne fonctionne pas ! t'aurais pas une autre solution (excel en Anglais :p)
      0
    5. 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
      0
  2. freddv
     
    =NO.SEMAINE(A1;2)

    voilou!
    19
    1. karaboudjan Messages postés 45 Statut Membre 39
       
      C'est parfait comme formule... Merci

      Le seul souci, j'utilise pour le moment Excel 2000 et cette formule ne fonctionne pas sur cette version.
      J'ai essayé sur un autre poste, utilisant 2007, ça fonctionne nickel.

      Y a-t-il une formule équivalente sur Excel 2000 ?
      0
      1. freddv > karaboudjan Messages postés 45 Statut Membre
         
        Essaye avec outil / macros complémentaires / et coche utilitaire d'analyse enregistre et ouvre ton classeur a nouveau.

        normalement ca marche sous 2000.

        voilou.
        0
  3. karaboudjan Messages postés 45 Statut Membre 39
     
    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) :
    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
    10