NO.SEMAINE

[beliser]

Bonsoir au forum,

Mon problème : Actuellement nous sommes en Semaine n° 17 du calendrier civil et quand j' ai écris la formule '=NO.SEMAINE(AUJOURDHUI();2) je me retrouve en Semaine 18.

J' ai lu entièrement votre fichier Excel 'DATEs ET HEURES' et je ne sais plus quel formule prendre pour reculer d' une Semaine.

Pouvez vous m' aider? Merci d' avance.

beliser.

 

[PascalXLD]

Bonjour

Fais une recherche sur le forum et sur les archives il y a une tripotée de fils sur le sujet

Bonne soirée

 

[pat1545.]

Salut,

no.semaine est faux pour l'europe (norme iso)

Voici la bonne du grand maitre Laurent Longre :

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

Patrick

 

[beliser]

Re bonsoir pat1545, Pascal76 et le forum.

Pascal dis moi ou tu colle la macro.

Dans le WorkSheet ou dans le Général.

Merci.

 

[Dan]

Bonsoir,

Beliser, ce serait sympa de cloturer ce Lien supprimé...ou nous dire ce qu'il en est...

Merci d'avance

 

[pat1545.]

ben...c'est une fonction que tu mets dans le fichier où tu as besoin de connaitre la semaine.
ALT F11, insertion/module et tu colles le texte

ensuite = nosem(A1) où A1 est une date
Patrick

 

[beliser]

Bonsoir,

Je retrouve sans cesse la semaine n° 18.

Ce n'est pas grave j' ai trouvé une autre formule qui est : =NO.SEMAINE(AUJOURDHUI();2)-1.

Merci à vous et @+

beliser.

 

[Monique]

Bonjour,

Tu as aussi cette formule, avec la date en A1 :
=ENT(MOD(ENT((A1-2+(JOURSEM(1)=7)*6)/7)+0,6+((JOURSEM(1)=7)*208);52+5/28))+1

 

[beliser]

Bonjour au forum,

Merci Monique, meme en lisant ton fichier créé avec l'aide de Celeda et Cathy j'ai dû sauter cette formule.

Encore Merci.

A+

 

[Monique]

Bonjour,

Cette formule n'est pas dans le fichier Dates et Heures