Erreur en sortant d'un userform

[natorp]

Bjr à toutes et tous

J'ai une erreur "incompatibilité de type" sur cette ligne du userform en cliquant sur le bouton "annuler"

Me.TextBox3 = Format(CDate(Me.TextBox1), "hh:mm")

Merci pour votre aide, cordialement, Gérard

 

[fredl]

Re : Erreur en sortant d'un userform

normal : si ton Texbox3 n'a pas de valeur, alors il y a erreur... ecrire plutot :

If Me.TextBox3 <> "" Then Me.TextBox3 = Format(CDate(Me.TextBox1), "hh:mm")
Cdt
Frédéric

 

[natorp]

Re : Erreur en sortant d'un userform

Merci, mais c'est bien-sûr !!!

Bonne fin d'aprèm, Gérard

 

[natorp]

Re : Erreur en sortant d'un userform

Re,

La réponse est correcte pour sortir en annulant, mais du coup le textbox3 ne s'alimente pas si je rentre une valeur en textbox1

Cordialement, Gérard