chaine de caractère dans textbox

E

Eric C

Guest

• 16 Novembre 2004

• #2

Bonjour le forum
Bonjour fred


Private Sub TextBox1_Exit (ByVal.......

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

End Sub

@ ++ Eric C

 

Vote positif 0 Vote négatif

E

EricS

Guest

• 16 Novembre 2004

• #3

bonjour

peut-être

Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1.Value, "00000")
End Sub

Eric

 

Vote positif 0 Vote négatif

E

EricS

Guest

• 16 Novembre 2004

• #4

Bonjour ERIC C

je ne t'avais pas vu

deux solutions avec autant de différence que nos pseudos!!!!!!!!

Eric S

 

Vote positif 0 Vote négatif

E

Eric C

Guest

• 16 Novembre 2004

• #5

Re le forum
Re bonjour fred, bonjour mon homonyme

En plus, dans propriétés de ton TextBox, place celle de MaxLength à 5 pour ne pas pouvoir saisir plus de 5 caractères.
@ ++ Eric C

 

Vote positif 0 Vote négatif

F

fred

Guest

• 16 Novembre 2004

• #6

J'ai essayé la formule :
Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1.Value, "00000")
End Sub

Mais lorsque je saisie par exemple 181, il m'affiche 00001 et impossible de saisir plus de chiffres.

 

Vote positif 0 Vote négatif

E

Eric C

Guest

• 16 Novembre 2004

• #7

Re le forum
Re bonjour fred, re bonjour Eric$

Saisi le code dans :
Private Sub TextBox1_Exit (ByVal......

et tout ira pour le meilleurs des mondes

@ ++ Eric C

 

Vote positif 0 Vote négatif

F

fred

Guest

• 16 Novembre 2004

• #8

il me met un message d'erreur dans Private Sub TextBox1_Exit (ByVal......
erreur de compilation (identificateur).
excusez-moi, je suis un novice (formation en cours)
Merci

 

Vote positif 0 Vote négatif

J

jmps

Guest

• 16 Novembre 2004

• #9

Bonjour Fred, Bonjour les Ericzzzzz,

Essaye ça Fred :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  TextBox1.Value = String(5 - Len(TextBox1.Value), "0") & TextBox1.Value
End Sub

Attention, la propriété Maxlength du textbox doit être à 5 sinon ça bug. On pourrait le contourner mais c'est plus cher lol !

A+

José

 

Vote positif 0 Vote négatif

F

fred

Guest

• 16 Novembre 2004

• #10

La formule de jmps fonctionne très bien.

Merci pour tout.

 

Vote positif 0 Vote négatif