Discussion :

[NEC14]

Bonjour à tous,

Voici ma question. Dans un formulaire 2 zones de texte (TxtLib et TxtVil). Je souhaites que le texte soit mis en majuscule impérativement. Si l'utilisateur saisie en minuscules lors de la validation le texte doit être transformé en majuscules. Est-ce possible ? Comment dois-je procéder ?
Merci par avance

[Jean-Philippe André]

bonjour,
regarde du côté de la fonction UCASE() (pour les majuscules) et LCASE() (pour les minuscules)

[NEC14]

bonjour,
regarde du côté de la fonction UCASE() (pour les majuscules) et LCASE() (pour les minuscules)

Bonjour,
Ok je regarde par là.
Merci pour ta réponse

J'ai vu, j'ai lu, mais je ne sais pas comment l'appliquer.
Il y a également une fonction VbProperCase qui permet de transformer la 1ère lettre en majuscule. Mais tout cela je ne sais pas l'encoder. J'ai trouvé des idées, lorsque je les applique, mon application crie de partout.
De plus, je souhaite que cela soit complétement transparent pour l'utilisateur.
Il valide, et la convertion se fait.
Merci pour votre aide

[NEC14]

J'ai trouvé. J'ai tapé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub TxtLib_AfterUpdate()
Me.TxtLib = UCase(TxtLib)
End Sub
 
Private Sub TxtVil_AfterUpdate()
Me.TxtVil = UCase(TxtVil)
End Sub

Par contre comment faire pour que seule la première lettre soit en majuscule ?

[Maxence HUBICHE]

le vbProperCase n'est pas une fonctin, mais une constante qui permet de déterminer la transformation d'une chaine avec la fonctino strConv. on l'utilise comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub TxtVil_AfterUpdate()
    Me.TxtVil = strconv(Me.txtVil,vbProperCase)
End Sub

[NEC14]

le vbProperCase n'est pas une fonctin, mais une constante qui permet de déterminer la transformation d'une chaine avec la fonctino strConv. on l'utilise comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub TxtVil_AfterUpdate()
    Me.TxtVil = strconv(Me.txtVil,vbProperCase)
End Sub

Bonjour,

Super ça marche. Vous êtes tous des champions. Par contre, si j'écris plusieurs mots, par exemple (recherche de gaz), chaque mot prend la première lettre en majuscule. Comment résoudre ce problème ?
Merci par avance