Textbox / Majuscule

[gildas lechat]

Bonjour le forum,

Pouvez vous me renseigner pour transformer les saisies en minuscule (ex :f) effectué par l'opérateur en majuscule (ex :F) dans un textbox?

Exemple ci dessous : Change les saisies de point en virgule et autorise les touches 0,9

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 46 'Change le point en virgule
KeyAscii = 44
Case 44, 48 To 57 'Autorise les touches 0 à 9
Case Else
KeyAscii = 0
End Select
End Sub

Merci d'avance
Gildas

 

[Papou-net]

Re : Textbox / Majuscule

Bonjour le forum,

Pouvez vous me renseigner pour transformer les saisies en minuscule (ex :f) effectué par l'opérateur en majuscule (ex :F) dans un textbox?

Exemple ci dessous : Change les saisies de point en virgule et autorise les touches 0,9




Merci d'avance
Gildas

RE :

Bonjour Gildas,

Utilise la fonction Ucase, ex :

TextBox1=Ucase(TextBox1)

Cordialement.

 

[gildas lechat]

Re : Textbox / Majuscule

Merci PAPOU Net

Comment mets le code en application?

Gildas

 

[Papou-net]

Re : Textbox / Majuscule

Merci PAPOU Net

Comment mets le code en application?

Gildas

RE :

Tu le mets tel quel, dans la procédure événementielle de ton TextBox, par ex :

Private Sub TextBox1_AfterUodate()
TextBox1=Ucase(TextBox1)
End Sub

Cordialement.