date en nombre de jour

P

Pascal76

Guest

• 14 Décembre 2004

• #2

Bonjour

Si tu as ta date en A1 une formule du style

=A1-DATE(ANNEE(A1);1;1)+1

te donne 349 (cellule à mettre en format nombre)

Mais il existe peut-être une fonction toute faite excel que je ne connais mais une des miss du forum ou autre forumeur la connaitra sans doute

Pascal

 

Vote positif 0 Vote négatif

P

Pascal76

Guest

• 14 Décembre 2004

• #3

re

si c'est toujours la date du jour qui t'interesse la même formule donne

=AUJOURDHUI()-DATE(ANNEE(AUJOURDHUI());1;1)+1

Pascal

 

Vote positif 0 Vote négatif

H

harley topper

Guest

• 14 Décembre 2004

• #4

date en nombre bis

resalut,
merci pascal pour ton aide, mais existe t il un equivalent de ces formules en VBA?????????

 

Vote positif 0 Vote négatif

P

Pascal76

Guest

• 14 Décembre 2004

• #5

Re

Bon j'avais pas compris que c'etait en VBA

Alors oui tu as la fonction DateDiff en VBA

Regarde l'aide et tu verras comment l'utiliser

Pascal

 

Vote positif 0 Vote négatif

H

harley topper

Guest

• 14 Décembre 2004

• #6

merci le forum, et merci bcp Pascal76!!!!!!

 

Vote positif 0 Vote négatif

B

bilal hayek

Guest

• 31 Janvier 2015

• #7

Re : date en nombre de jour

Merci à tous les membres pour cette réponse.

 

Vote positif 0 Vote négatif

cathodique

XLDnaute Barbatruc

• 31 Janvier 2015

• #8

Re : date en nombre de jour

Bonjour,

Peut-être avec ceci, utilisation de la fonction DateDif.

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 31 Janvier 2015

• #9

Re : date en nombre de jour

Bonjour à tous

DateDif n’étant pas fiable à 100% je propose la fonction suivante qui donne le nombre de jours entre le début de l'année et la date actuelle

Code:

function nbj()
deb = CDate("31/12/" & Year(Date) - 1)
nbj = Date - deb

End Function

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 31 Janvier 2015

• #10

Re : date en nombre de jour

Bonsoir le Fil
Bonsoir Pierrejean
cela revient , si j'ai bien compris , a définir le Quantième du Jour de l'année.
j'utilise cela dans un de mes Fichiers (a voir)
[highlight=Vba]Quant_Date = Format(Date - DateSerial(Year(Date), 1, 0), "000") 'On détermine le quantieme du jour d'aujourdhui[/code]
Bonne fin de Soirée
Amicalement
Jean Marie

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 1 Février 2015

• #11

Re : date en nombre de jour

Bonjour à tous.

Une autre solution par calcul direct sur la date, i.e. sans passer par un 1[SUP]er[/SUP] janvier ou un 31 décembre :​

Code:

=ENT((SOMME((MOD(ANNEE(A1);{400;100;4})=0)*{1;-1;1})-2,2)*(MOIS(A1)>2)+30,6*MOIS(A1)-30,1)+JOUR(A1)

Code:

Function JourAnnée%(d As Date)
Dim a%, m%
  d = d - (d < 60)
  m = Month(d)
  a = Year(d)
  JourAnnée = Int(((a Mod 400 = 0) - (a Mod 100 = 0) + (a Mod 4 = 0) + 2.2) * (m > 2) + 30.6 * m - 30.1) + Day(d)
End Function

Pourquoi faire simple si on peut faire compliqué ?



Bonne journée.


ℝOGER2327
#7728

Samedi 7 Gueules 142 (Saint Gueule, abbé - fête Suprême Quarte)
13 Pluviôse An CCXXIII, 1,7850h - laurier
2015-W05-7T04:17:02Z

 

Vote positif 0 Vote négatif