Nbre de jours dans une année

[Fredrennes]

Bonjour à tous,

Pouvez-vous me dire s'il existe une fonction me permettant d'obtenir le nombre de jours compris dans une année svp ?

Ex : fonction(année)=365

Merci

Bonne journée

Cdlt

Fred

 

[andré]

Salut,

Je ne connais pas de fonction, bien une petite formule.
Voici deux exemples (format standard) :

=DATE(5;1;1)-DATE(4;1;1)
=MOIS.DECALER(AUJOURDHUI();12)-AUJOURDHUI()+1

Ândré

 

[Christophe]

Une année est bissextile si elle est divisible par 4, sauf les siècles non divisible par 400.

ex : 1998 non bissextile
2000 bissextile
2004 bissextile
2100 non bissextile

Public Function NbJours(annee As Integer) As Integer
If annee Mod 4 = 0 Then
If annee Mod 100 = 0 And annee Mod 400 <> 0 Then NbJours = 365 _
Else NbJours = 366
Else
NbJours = 365
End If
End Function

Sub test()
MsgBox "Nombre de jours dans 1998 : " & NbJours(1998)
MsgBox "Nombre de jours dans 2000 : " & NbJours(2000)
MsgBox "Nombre de jours dans 2004 : " & NbJours(2004)
MsgBox "Nombre de jours dans 2003 : " & NbJours(2003)
MsgBox "Nombre de jours dans 2100 : " & NbJours(2100)
End Sub

 

[chris]

Bonjour
Sinon pour faire simple
=DATE(2005;12;31)-DATE(2005;1;0)
donne le nombre de jours en 2005
Chris

 

[Fredrennes]

Merci à vous, bonne fin de journée

Cdlt

Fred