Forcer l'écriture en MAJUSCULE dans un textBox

[Willy]

Bonsoir à tous
Je souhaiterai forcer l'écriture en MAJUSCULE ou en minuscule dans un textBox
Par exemple, en MAJUSCULE pour mon textBox1 qui contient le nom;
En minuscule pour mon textBox2 qui contient l'adresse é-mail.

Je n'ai rien trouvé dans les propriétés, donc si c'est possible, j'en conclu que ce sera en Vba non ?

Merci à vous et bonne soirée pour les couches tard comme moi
Willy

 

[@+Thierry]

Bonsoir Willy

C'est pas sorcier, en évènement change ça marche bien :

Pour les MAJUSCULES
Private Sub TextBox1_Change()
TextBox2.Value = UCase(TextBox1.Value)
End Sub

Pour les Minuscules
Private Sub TextBox2_Change()
TextBox2.Value = LCase(TextBox2.Value)
End Sub

Bonne nuit
@+Thierry

 

[Willy]

Bonjour Thierry,
merci pour ton aide.

Willy