Bonjour,
Bon 1er Mai
Suite à mon message sollicitant de l'aide Eric.C concernant les majuscules aux noms propres Eric.c m'avais transmis la procédure suivante
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(TextBox1) And Len(TextBox1) > 1 Then TextBox1 = Application.Proper(TextBox1): Exit Sub
TextBox1 = ""
End Sub
Super et encore Merci à lui.
Existe-t-il une provedure semblable pour que Tout le NOM soit en majuscule.
Merci
Cordialement
M.D
Bon 1er Mai
Suite à mon message sollicitant de l'aide Eric.C concernant les majuscules aux noms propres Eric.c m'avais transmis la procédure suivante
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(TextBox1) And Len(TextBox1) > 1 Then TextBox1 = Application.Proper(TextBox1): Exit Sub
TextBox1 = ""
End Sub
Super et encore Merci à lui.
Existe-t-il une provedure semblable pour que Tout le NOM soit en majuscule.
Merci
Cordialement
M.D