NO.SEMAINE(aujourdhui()) faux en 2005

C

claude

Guest

• 7 Janvier 2005

• #2

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

 

Vote positif 0 Vote négatif

C

claude

Guest

• 7 Janvier 2005

• #3

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

 

Vote positif 0 Vote négatif

E

emg

Guest

• 7 Janvier 2005

• #4

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

 

Vote positif 0 Vote négatif

E

emg

Guest

• 7 Janvier 2005

• #5

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

 

Vote positif 0 Vote négatif

N

Nicolas

Guest

• 7 Janvier 2005

• #6

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.

 

Vote positif 0 Vote négatif

P

Pascal76

Guest

• 7 Janvier 2005

• #7

Bonjour

tu trouveras une explication sur ce fil

Lien supprimé

Bonne journée

Pascal

 

Vote positif 0 Vote négatif

N

Nicolas

Guest

• 7 Janvier 2005

• #8

OK,

Merci pour tout,

A bientôt

 

Vote positif 0 Vote négatif

E

emg

Guest

• 7 Janvier 2005

• #9

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

 

Vote positif 0 Vote négatif

P

pino

Guest

• 22 Janvier 2005

• #10

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

 

Vote positif 0 Vote négatif