NO.SEMAINE(aujourdhui()) faux en 2005

[Nicolas]

Bonjour le forum et bonne année à toutes et à tous.

depuis 2005 l'instruction no.semaine(aujourdhui()) me renvois un numéro faux (exemple 2 pour aujourdhui le 6/1/2005) et ce quelque soit la méthode :
no.semaine(aujourdhui())
no.semaine(aujourdhui();1)
no.semaine(aujourdhui();2)

Quelqu'un a t'il une idée de comment corriger ?

Merci et à bientôt.

 

[claude]

Nicolas,
Bonjour

Formule pour n° de semaine en norme ISO calendrier 1900

=ent(mod(ent((a1-2)/7)+0,6;52+5/28))+1

bonne journée
Claude

 

[claude]

Nicolas,
Bonjour

Formule pour n° de semaine en norme ISO calendrier 1900

=ent(mod(ent((a1-2)/7)+0,6;52+5/28))+1

bonne journée
Claude

 

[emg]

Bonjour Claude, Nicolas, le Forum

Par exemple en utilisant la fonction CLSC qui retourne correctement le numéro de la semaine pour le premier Janvier 2005, saisie en A1 01/01/2005 et dans la cellule B1 tu appel la fonction CLSC. En faisant comme suit « Insertion > Fonction > Personnalisées > CLSC > puis OK la cellule B1 a maintenant la semaine 53 =CLSC(A1)

'************ Calcul les semaines calendaires ************
'Pour XLD
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


@+ Gérard

 

[emg]

Re infos

Un autre exemples des Formules Calcul de Dates avec la Fonction ( DatePart )
Intégrer dans Excel pour plus d'information sur cette fonction met
en surbrillance DatePart et tape sur F1 le pense bête d'Excel

'NUMERSEMAINE
Function NUMERSEMAINE(Donnees As Date)
NUMERSEMAINE = DatePart( _
interval:="ww", _
Date:=Donnees, _
firstdayofweek:=vbUseSystemDayOfWeek, _
firstweekofyear:=vbFirstFourDays)
End Fungiforme

Bien évidemment à mettre dans un module

Gérard

 

[Nicolas]

Merci beaucoup, ça marche bien, et je modifie mon tableau.

Mais pour info, la fonction excel no.semaine fonctionnait en 2004 et pourquoi plus en 2005 ? es ce un problème sur mon pc ou un bug windows qui a d'autres conséquences ?

a+
Nicolas.

 

[Pascal76]

Bonjour

tu trouveras une explication sur ce fil

Lien supprimé

Bonne journée

Pascal

 

[Nicolas]

OK,

Merci pour tout,

A bientôt

 

[emg]

Bonsoir Pascal76 le forum

Merci pascal je ne me souvenais plus de ce fil mis sur le forum et pourtant facile a retrouver

Gérard

 

[pino]

je vodrais ajouter dans facture# un numero qui se suit , comme facture numéro 1 puis 2 etc.... dans excel