Discussion :

[AVNAIM]

Bonjour,
Quelqu'un pourrait il me dire comment je peux codifier la touche End du clavier afin de déclencher une procédure lorsque celle-ci est enfoncée par l'utilisateur ? son code ASCII?
Merci d'avance
Avnaim

[ucfoutu]

Bonjour,

apprends à pêcher un peu, s'il te plait !

Dans l'évènement KeyDown d'une textbox nommée text1 :

Code :

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

MsgBox KeyCode & "  " & vbKeyEnd

va dsans ta textbox et appuie sur ta touche End....
Tu apprendras ainsi deux choses à la fois ...

Edit : et pour continuer à apprendre un peu plus, tu vas dans ton aide en ligne, à la rubrique "Code des touches, constantes"... et tu lis !

[JackOuYA]

Bonsoir Avain :

dans thisworkbook :

Code :

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

1
2
3
4
 
Private Sub Workbook_Open()
 Application.OnKey "{End}", "ActionSurEnd"
End Sub

dans un module

Code :

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

1
2
3
4
5
 
Sub ActionSurEnd()
  MsgBox "Appui sur End"
 
End Sub