Vba

keno -  
Kobaya Messages postés 282 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour a tous,

je cherche une fonction en vba qui me permette lorsque j'entre une chaine de caractere dans une textbox, de la voir s'afficher directement en majuscules.

Merci d'avance

1 réponse

  1. Kobaya Messages postés 282 Date d'inscription   Statut Membre Dernière intervention   214
     
    salut,

    Ucase() est ce que tu cherches...

    0
    1. keno
       
      Merci de ta part Kobaya,

      mais je n'y arrive toujours pas car j'aimerais intégrer Ucase à l'événement keypress de la textbox.et je ne comprends pa bien car il y a une histoire de code ascii dans cet evenement keypress.
      0
    2. Kobaya Messages postés 282 Date d'inscription   Statut Membre Dernière intervention   214
       
      essaie ça, c'est pas parfait, mais...

      Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
      If KeyCode >= 65 And KeyCode <= 90 Then
      TextBox1.Value = Left(TextBox1.Value, Len(TextBox1.Value) - 1) & Chr(KeyCode)
      End If
      End Sub
      0