OVH Cloud OVH Cloud

vba format d'affichage de l'heure

2 réponses
Avatar
j-pascal
Bonjour,

Dans la proc suivante, l'heure s'affiche sous la forme "09:50:25". Est-il
possible d'avoir : "09:50" seulement ou "9 heures 50" ?

Merci d'avance pour vos (éventuelles) réponses ;-)

JP

Sub DateEtHeure()

'Dim LaDate As Date, LHeure As Date
LaDate = Date
LHeure = Time
MsgBox "Nous sommes le " & LaDate & Chr(10) & Chr(10) & "Il est " & LHeure,
vbOKOnly + vbInformation, "hello"

End Sub

2 réponses

Avatar
Jacky
Bonjour,
'--------
MsgBox "Nous sommes le " & LaDate & Chr(10) & Chr(10) & "Il est " &
Format(LHeure, "hh:mm"), vbOKOnly + vbInformation, "hello"
--
Salutations
JJ

"j-pascal" a écrit dans le message de news:

Bonjour,

Dans la proc suivante, l'heure s'affiche sous la forme "09:50:25". Est-il
possible d'avoir : "09:50" seulement ou "9 heures 50" ?

Merci d'avance pour vos (éventuelles) réponses ;-)

JP

Sub DateEtHeure()

'Dim LaDate As Date, LHeure As Date
LaDate = Date
LHeure = Time
MsgBox "Nous sommes le " & LaDate & Chr(10) & Chr(10) & "Il est " &
LHeure, vbOKOnly + vbInformation, "hello"

End Sub


Avatar
JB
LHeure = Time
MsgBox "Il est:" & Format(LHeure, "hh:mm")

JB


Bonjour,

Dans la proc suivante, l'heure s'affiche sous la forme "09:50:25". Est-il
possible d'avoir : "09:50" seulement ou "9 heures 50" ?

Merci d'avance pour vos (éventuelles) réponses ;-)

JP

Sub DateEtHeure()

'Dim LaDate As Date, LHeure As Date
LaDate = Date
LHeure = Time
MsgBox "Nous sommes le " & LaDate & Chr(10) & Chr(10) & "Il est " & LHeur e,
vbOKOnly + vbInformation, "hello"

End Sub