Date de demain !

Signaler
Messages postés
572
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
4 mai 2020
-
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
27
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
572
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
4 mai 2020

merci !!


Herve
Messages postés
572
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
4 mai 2020

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
27
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
572
Date d'inscription
mardi 30 avril 2002
Statut
Membre
Dernière intervention
4 mai 2020

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
27
Dim Get_Heure As Date

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

MsgBox Get_Heure

Daniel