Détexter l'appui sur [ENTER] dans une textbox

[Philippe]

Bonjour à tous,

j'ai besoin de détecter l'appui sur la touche [ENTER] lorsqu'une textbox a le focus dans mon USF, et ceci MEME SI LE TEXTE DE LA TEXTBOX N'A PAS ETE MODIFIE. Je ne peux donc pas utiliser l'évènement .change et .keypress est activé par toutes les touches SAUF [ENTER]...
Sacré casse tête... Mais il y a surement une solution...

Merci de votre aide
A+
Philippe

 

[tirex28]

Re : Détexter l'appui sur [ENTER] dans une textbox

Bonjour,

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then btnOK_Click
End Sub

Private Sub btnOK_Click()
    MsgBox "ok"
End Sub

Une autre possibilité est de mettre la propriété Default du bouton OK à True.

Cordialement,

Tirex28/