Afficher une date à la sortie d'une txtbox d'un userform

Bonjour à tous, je souhaiterais qu'en sorti de ma txtbox P1, l'heure du PC s'affiche automatiquement dans la txtbox heure. Pour l'instant mon code est le suivant mais rien ne se passe :

Private Sub txt1ep___Exit(ByVal Cancel As MSForms.ReturnBoolean)
txtheure.Value = Format(Time, "h:m")

End Sub

Merci d'avance pour votre aide

image

Bonjour Alice3,

Quel est le prochain contrôle à renseigner après P1?

Bonsoir P2, P3, P4, etc. Je vois joins mon userform en entier

image

Suite,

P2 est-il toujours renseigné après P1 ou c'est facultatif?

P2 est toujours renseigné

Donc, en sortant de P1 par la touche Entrée, l'événement Exit devrait s'appliquer à P1.

Pour vérifier Inscris Stop avant le End Sub de la macro Private sub de ton contrôle P1.

Cela va arrêter la macro afin de voir si l'événement est bien pris. Ensuite il est possible de contrôler la valeur de l'expression Format(Time...) en passant la souris dessus ou mieux encore en utilisant le menu débogage et le sous-menu espion.

Finir ensuite en appuyant sur la touche F5.

A nouveau,

Je viens de tester en ouvrant mon ordi portable et cela fonctionne.

Juste ajouter un deuxième m au format time pour que les minutes s'affichent sur 2 caractères.

Merci de votre réponse ca fonctionne !!!

Rechercher des sujets similaires à "afficher date sortie txtbox userform"