heure en retard résolus montre a l heure

[jmcr]

bonjour le forum
nous avons un msgbox avec un message qui nous donne aussi l heures ,mais voila cette heures est toujours en retard de 20 minute au moins
voila le msg
MsgBox ("Mon premier MESSAGE EST :" & Chr(10) & "Nous sommes le " & Format(Date, "dddd d mmmm yyyy") & _
Chr(10) & "Il est " & Format(Now(), "hh") & " H et " & Format(Now(), "mm") & " mn.")
End Sub
pouvez vous me dire se qui cloche dans notre smgbox svp
merci pour tout interventions

 

[Modeste geedee]

Bonsour®

bonjour le forum
nous avons un msgbox avec un message qui nous donne aussi l heures ,mais voila cette heures est toujours en retard de 20 minute au moins
voila le msg
MsgBox ("Mon premier MESSAGE EST :" & Chr(10) & "Nous sommes le " & Format(Date, "dddd d mmmm yyyy") & _
Chr(10) & "Il est " & Format(Now(), "hh") & " H et " & Format(Now(), "mm") & " mn.")

en l'absence d'indication d'autres indicateurs horaires ,
"mm" vaut pour N° de mois !!!
contournement :
Chr(10) & "Il est " & Format(Now(), "hh""H""mm""mn""")
ou bien
Chr(10) & "Il est " & Format(Hour(Now())), "00") & " H et " & Format(Minute(Now()), "00") & " mn.")

 

[jmcr]

BONJOUR modeste
merci pour l'info je comprend mieux mon erreur
merci pour ton aide
amicalement

 

[jmcr]

bonsoir le forum
MODESTE ma bien aidé mais voila cela bug ici
il inscrit erreur de compile ou de syntaxe même chose pour sont deuxieme code la ligne verte et bleu pouvez vous me dire pourquoi
Option Explicit
Private Sub Workbook_Open()
'Sheets("acceuil").Activate
UserForm3.Show
Range("B1").Select
MsgBox ("MON PREMIER MESSAGE EST LE SUIVANT :" & Chr(10) & "Nous sommes le " & Format(Date, "dddd d mmmm yyyy")
& _Chr (10) & "Il est " & Format(Now(), "hh""H""mm""mn""")
End Sub
je vous remercie par avance

 

[jmcr]

bonsoir le forum j ai trouvé l erreur encore merci