La fonction VBA Time renvoie l'heure système actuelle.
Time
Gardons le temps obtenu par la fonction Time dans la cellule A1 :
Sub TimeExample1() Range("A1") = Time End Sub
Affichage de l'heure obtenue par la fonction Time au format texte :
Sub TimeExample2() MsgBox Format(Time, "hh\hnn") 'Retours, par exemple : 13h24 End Sub
Nous effectuerons l'action uniquement s'il est maintenant au moins 17h00 :
Sub TimeExample3() If Hour(Time) >= 17 Then MsgBox "La journée est presque terminée !" End If End Sub