Discussion :

[yucf_miagiste]

bonsoir

comment je peux récuperer les num des weeks d'un moi donné
par exemple pour le moi septembre je veux avoir week 32 week 36 week 37 week 38 week 39

merci d'avance

[mout1234]

Bonsoir,

Pour calculer le numéro de semaine, tu peux faire quelque chose du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Function WeekNum(dDate As Date) As Byte
    WeekNum = 1+DateDiff("d", DateSerial(Year(dDate), 1, 1), dDate) \ 7
End Function

[kiki29]

Soir Bon
A placer dans un Module pour être utilisée en fonction personnalisée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Function NumeroSem(ByVal dDate As Date) As Integer
    NumeroSem = DatePart("ww", dDate, vbMonday, vbFirstFourDays)
End Function

[DarkVader]

ou plus simplement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

format(now,"ww")

[yucf_miagiste]

merci bq ca marche

[mout1234]

Bonsoir,

Pour calculer le numéro de semaine, tu peux faire quelque chose du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Function WeekNum(dDate As Date) As Byte
    WeekNum = 1+DateDiff("d", DateSerial(Year(dDate), 1, 1), dDate) \ 7
End Function

ou plus simplement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

format(now,"ww")

Je me disais aussi... il me semblait qu'il y avait plus simple

Mais bon ma petite fonction marche quand même

[Gorfael]

Je me disais aussi... il me semblait qu'il y avait plus simple

Mais bon ma petite fonction marche quand même

Salut
Menu Outils>>Macros Complémentaires
Cocher : Utilitaire d'analyse

Dans les formules apparait : NO.SEMAINE
A+