Sujet Précédent Sujet Suivant

NOMBRE DE JOURS DANS LE MOIS

nixcsv7test Messages postés 1 Date d'inscription samedi 10 juillet 2004 Statut Membre Dernière intervention 14 janvier 2005 - 14 janv. 2005 à 14:12
frite333 Messages postés 9 Date d'inscription lundi 30 novembre 2009 Statut Membre Dernière intervention 23 décembre 2010 - 23 déc. 2010 à 15:57

Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/832-nombre-de-jours-dans-le-mois

frite333 Messages postés 9 Date d'inscription lundi 30 novembre 2009 Statut Membre Dernière intervention 23 décembre 2010
23 déc. 2010 à 15:57

J'espere que personne va prendre ce code horrible. Une année n'est pas bissexile seulement quand elle est divisible par 400 mdr

Utilisateur anonyme
7 févr. 2009 à 16:34

Bonjour,

désolé de resortir le post du grenier, mais on peut faire aussi comme ça :

NbJourMoisCourant = Day(DateSerial(Year(UneDate), Month(UneDate) + 1, 0))

Nicodemus83 Messages postés 1 Date d'inscription jeudi 29 septembre 2005 Statut Membre Dernière intervention 6 juillet 2007
6 juil. 2007 à 13:02

Heu... SOPALAIN... qu'est ce qui se passe lorsque je passe le mois de décembre ? on fait la différence entre le 01/12/AAAA et le 01/13/AAAA ?

le5ejumeau Messages postés 130 Date d'inscription mardi 11 mars 2003 Statut Membre Dernière intervention 9 juillet 2009
2 févr. 2007 à 17:22

heu en .net on fait comme ca : Date.DaysInMonth(Y, M) avec y c'est l'année et M le mois
ca existait pas avant ça ?

cs_SOPALAIN Messages postés 2 Date d'inscription vendredi 2 décembre 2005 Statut Membre Dernière intervention 11 mars 2006
11 mars 2006 à 14:35

De Sopalain :

Pardon j'ai oublié de corriger la première ligne que j'avais tout simplement copiée,
Bien sûr il faut lire :

Function NbJourDansMois(LeMois, Lannée)

mais je suis ceratin vous aviez corrigé de vous même.

Sopalain.

cs_SOPALAIN Messages postés 2 Date d'inscription vendredi 2 décembre 2005 Statut Membre Dernière intervention 11 mars 2006
11 mars 2006 à 14:29

Je vous suggère une autre solution tout aussi éfficace :

Function NbJourDansMois(LeMois, LeAnnee)

NbJourDansMois = DateDiff("d", "01/" & Replace(Right(STR(lemois),2), " ", "0") & "/" & Right(STR(Lannée), 4), "01/" & Replace(Right(STR(lemois + 1), 2), " ", "0") & "/" & Right(STR(Lannée), 4))

END function

Sopalain.

Discussions similaires

Convertir nombre de jours en année, mois et jours

calcul 45 jours fin de mois

génerateur de nombre aléatoire

calcul d'un nombre de jours entre deux dates

Nombre de semaines dans l'année

Votre réponse

Discussions similaires