Evenement Key_press textbox / formulaire

Résolu
ph412 Messages postés 49 Statut Membre -  
 Ph412 -
Bonjour,

Je souhaite que dans une formulaire un utilisateur indique des mots dans une textbox.

A chaque fois qu'il appuiera sur "entrée" la valeur de la textbox sera transmise dans une listbox.

Mon problème c'est qu'a chaque fois que j'appuie sur la touche entré d'une textbox, la selection/focus se place sur un autre contrôle du formulaire.

Comment arrêter cela ?
j'imagine que ça à avoir avec tablstop et tabindex mais je pige pas

Merci

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 13 Then
ListBox2.AddItem TextBox2.Value
End If

1 réponse

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,

    Comme ceci :

    Pour sortir du textbox, appuyez sur Tabulation ou fermez l'userform

    Option Explicit
    
    Private NeSortPas As Boolean
    
    Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox1 = ""
    Cancel = NeSortPas
    End Sub
    
    Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Or KeyCode = 10 Then
       NeSortPas = True
       ListBox1.AddItem TextBox1
    ElseIf KeyCode = 9 Then NeSortPas = False
    End If
    End Sub


    1
    1. Ph412
       
      Merci c'est top !!
      0