Touche End du clavier

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

Bonjour,

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

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

Code:

---

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 !

Bonsoir Avain :

dans thisworkbook :

Code:

---

1 2 3 4

Private Sub Workbook_Open() Application.OnKey "{End}", "ActionSurEnd" End Sub

---

dans un module

Code:

---

1 2 3 4 5

Sub ActionSurEnd() MsgBox "Appui sur End"   End Sub

---