OVH Cloud OVH Cloud

Keydown

1 réponse
Avatar
Gadget
Salut à tous.
J'ai un combobox et je voudrais controler les touches frappées par
l'utilisateur quand il a le focus.
Ma cbox s'appelle CboSalariés
J'ai donc créé une proc ainsi :
Private Sub CboSalariés_KeyDown(ByVal KeyCode As MSForms.ReturnInteger,
ByVal Shift As fmShiftState)

Mais visiblement vbe ne reconnais pas cette ligne :
"erreur de compil : type défini par l'utilisateur non défini."

Ai-je fait une fautre de syntaxe qqpart?
Merci de vos réponses.

--
Carpe Diem Quam Minimum Credula Postera
Bicose
Sic Transit Gloria Mundi, et
Arx Tarpeia Capitoli Proxima !!

1 réponse

Avatar
Hervé
Salut Gadget,
utilise un Select Case pour gérer les touches :
Private Sub CboSalariés_KeyDown( _
ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
Select Case KeyCode
Case 13
MsgBox "Entrée"
Case 17
MsgBox "Ctrl"
Case 9
MsgBox "Tab."
Case 8
MsgBox "Retour"
Case 46
MsgBox "Supprimer"
'ainsi de suite...
End Select
End Sub

Hervé.

"Gadget" a écrit dans le message news:
3f27c29a$0$15118$
Salut à tous.
J'ai un combobox et je voudrais controler les touches frappées par
l'utilisateur quand il a le focus.
Ma cbox s'appelle CboSalariés
J'ai donc créé une proc ainsi :
Private Sub CboSalariés_KeyDown(ByVal KeyCode As MSForms.ReturnInteger,
ByVal Shift As fmShiftState)

Mais visiblement vbe ne reconnais pas cette ligne :
"erreur de compil : type défini par l'utilisateur non défini."

Ai-je fait une fautre de syntaxe qqpart?
Merci de vos réponses.

--
Carpe Diem Quam Minimum Credula Postera
Bicose
Sic Transit Gloria Mundi, et
Arx Tarpeia Capitoli Proxima !!