Date de demain !

Signaler
Messages postés
567
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
24 janvier 2014
-
Gobillot
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
-
Salut



Est ce que qqn connaitrais une fonction permettant de recuperer la date de demain ?

Herve

7 réponses

Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
21
pour la date de demain oui:
MsgBox DateAdd("d", 1, Date)

pour le journal faudra attendre.

Daniel
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005

Dim Demain As Date

Demain = Date + 1
Messages postés
567
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
24 janvier 2014

merci !!


Herve
Messages postés
567
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
24 janvier 2014

Argh argh argh



Comment etre sure de recuperel heure courante sous la forme 15:40:30 ???



en faisant :

Get_Heure = Format(time, "hh:mm")



GetHeure=15 40



!!!!

Herve
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
21
tu mets les secondes aussi:

Get_Heure = Format$(time, "hh:mm:ss")

mais c'est plus court comme ça:

Get_Heure = Time$

Daniel
Messages postés
567
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
24 janvier 2014

en fait j aimerais l heure sans les secondes !

et en faisant : Get_Heure = Time$



GetHeure = 18:42:44



et en faisant :
Get_Heure = Time



getheure = 18 42 44



!!!



Merci !


Herve
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
21
Dim Get_Heure As Date

Get_Heure = TimeSerial(Hour(Time), Minute(Time), 0)

MsgBox Get_Heure

Daniel