Bonjour à toutes à tous,

J'ai un petit souci de formatage d'heure.
Je souhaite afficher dans un label l'heure qu'il sera dans une heure avec la fonction DateAdd.
Je souhaiterais le format "hh:mm" et le code ci-dessous me renvoie au format "hh:mm:ss".
Si quelqu'un a un petit truc... merciiii


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub CommandButton_heure_Click()
 
UserForm1.Label_heure = DateAdd("h", 1, Format(Time, "hh:mm"))
 
End Sub