Discussion :

[juju05]

Bonjour,

Je souhaite par macro. extraire les enregistrements d'une base de données dont la date et l'heure de création sont de plus de 2 heures par rapport à la date et l'heure actuelle.

J'ai cherché sur le web comment récupérer la date et l'heure actuelle (il faut utiliser Now). Par contre, je ne sais pas comment soustraire 2 heures. Lorsque je soustrais 2 à Now, le système enlève 2 jours.

Merci d'avance.
Julien.

[mercatog]

Regarde l'aide sur DateAdd

Exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox DateAdd("h", -2, Now)

[Soraphiroth]

Plus simple : 1 jour = 1, donc 24h = 1, donc 1h= 1/24

tu peux donc écrire Now - (1/12) afin de soustraire deux heures.

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub test()
Dim T As Date
T = Now - CDate("05:00:00")
If T <= (Now - CDate("02:00:00")) Then MsgBox "Oui"
End Sub