Format téléphone dans TextBox...

Christian0258 · 23 Juillet 2018

Bonjour à tout le forum,

Je souhaiterais vos aide, afin de savoir si l'on peut mettre devant ce format téléphone de ma TexBox, le mot "Tél ; " devant ce format ???

Private Sub TelPort_AfterUpdate()
TelPort.Value = Format(TelPort.Value, "0#"" ""##"" ""##"" ""##"" ""##")
End Sub

Merci pour votre aide.

Bien amicalement,
Christian

bbb38 · 23 Juillet 2018

Bonsoir Christian, le forum,

Une méthode, en utilisant une procédure évènementielle Exit sur la Textbox :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

Me.TextBox1.Value = Format(Me.TextBox1.Value, "00 00 00 00 00")

End Sub

Cordialement,

Bernard
P.S. Mille excuses. J'ai répondu trop rapidement, sans lire correctement ta demande. Je teste sur un TextBox.

bbb38 · 23 Juillet 2018

Bonsoir Christian, le forum,
Pas terrible, mais cela fonctionne.
Cordialement,
Bernard

bbb38 · 23 Juillet 2018

Bonsoir Christian, le forum,
Avec une seule ligne de code.
Cordialement,
Bernard

Christian0258 · 23 Juillet 2018

Re, le forum, bbb38

Merci, infiniment Bernard, c'est impec…

Bien à toi,
Christian

Format téléphone dans TextBox...

Christian0258

XLDnaute Accro

bbb38

XLDnaute Accro

bbb38

XLDnaute Accro

Pièces jointes

bbb38

XLDnaute Accro

Pièces jointes

Christian0258

XLDnaute Accro

Discussions similaires