Numéro de semaine

[edelweisseric]

Bonjour à tous

Malgré mes nombreuses recherches, je n'ai pu trouver le moyen, par une toute petite fonction ou en VBA ou les deux ( soyons exigent !!! lol ), de récupérer dans la cellule A1, par exemple, le numéro de la semaine par rapport à aujourd'hui.

Cela doit être d'une simplicité effarente, mais je n'ai pas d'inspiration depuis plusieurs jours.

Merci de vos conseils

Cordialement

Edelweisseric

 

[Monique]

Bonjour,

Il y en a, pourtant, des posts à ce sujet.
Regarde ici, dans le fichier posté,
tu as, en plus, le calcul du n° de semaine :
Lien supprimé

 

[pat1545.]

Salut,
de L. Longre:
en vba à coller dans un module et fonctionne à la normr iso européenne contrairement à no.semaine d'excel:

Option Explicit
Function NoSem(D As Date) As Long 'Laurent Longre
' fonctionne suivant la norme ISO contrairement à no.semaine()
D = Int(D)
NoSem = DateSerial(Year(D + (8 - Weekday(D)) Mod 7 - 3), 1, 1)
NoSem = ((D - NoSem - 3 + (Weekday(NoSem) + 1) Mod 7)) \\ 7 + 1
End Function

Bye

 

[pat1545.]

sorry Monique, pas rafraichis

hmy:

 

[edelweisseric]

Bonjour Monique, Pat
bonjour à tous

Merci beaucoup pour vos réponses

Ta réponse sur l'autre post Monique n'était pas arrivée jusqu'à chez moi ... j'habite très loin lol, j'avais dégainé avant il me semble

Je vous remercie encore de votre gentillesse et de vos multiples réponses

Amicalement