TEXTBOX majuscule et minuscule

F

fRANCK

Guest
Bonsoir a tous

mon probleme est que je voudrai dans un textbox que la saisie (d'un prenom) soit formatée avec une Majuscule

j'ai essayé avec Ucase et Lcase
et aussi avec
textbox1.text = Format(textbox1.text , '>')
mais je formate toujour toute ma saisie

ma meilleur approche est celle ci
If Len(textbox1.Text) = 1 Then
textbox1.Text = UCase(Left(textbox1.Text, 1))
End If
Ca marche en saisie direct mais pas dans le cas d'un copier coller

Merci de votre aide
Franck
 

myDearFriend!

XLDnaute Barbatruc
Bonsoir fRANCK,

Tu peux essayer simplement :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
      TextBox1.Text = Application.Proper(TextBox1.Text)
End Sub
Ou même, si tu veux visualiser ce formatage au moment même de la saisie :
Private Sub TextBox1_Change()
      TextBox1.Text = Application.Proper(TextBox1.Text)
End Sub
Cordialement,
 

Discussions similaires

Réponses
19
Affichages
2 K

Statistiques des forums

Discussions
312 938
Messages
2 093 771
Membres
105 816
dernier inscrit
TASTET B