Discussion :

[krfa1]

Bonjour à tous,

Je rencontre un petit problème tout bête. Je souhaiterais savoir comment faire pour déclencher un procédure ou fonction, lors d'un KeyPress de la touche "TAB" sur une cellule d'un fichier excel.

Si quelqu'un aurait une solution, merci d'avance pour votre aide.

Meilleures salutations.

Krfa1

[fred65200]

bonjour,

si tu regardes dans l'aide

KeyPress, Un événement KeyPress ne se déclenche pas lorsque l'utilisateur appuie sur l'une des touches suivantes :

• TAB.
• ENTRÉE.
• Une touche de direction.
• Une touche qui déplace le focus d'un contrôle à un autre.

une solution est l'utilisation de l'API GetAsyncKeyState

Code :

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

Public Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Long) As Integer

Exemple de code pour l'appui sur Tab

Code :

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

1
2
3
4
5
'Boucle tant que touche Suppr pas actionnée..
While GetAsyncKeyState(&09) = 0
 DoEvents
Wend
MsgBox "OK"

et enfin une liste des constantes

• VK_F9 78 Touche f9
• VK_F8 77 Touche f8
• VK_F6 75 Touche f6
• VK_F7 76 Touche f7
• VK_F5 74 Touche f5
• VK_F4 73 Touche f4
• VK_F3 72 Touche f3
• VK_F2 71 Touche f2
• VK_F1 70 Touche f1
• VK_DIVIDE 6F Touche "division".
• VK_DECIMAL 6E Touche séparateur décimal.
• VK_SUBTRACT 6D Touche "soustraction".
• VK_SEPARATOR 6C Touche de séparation.
• VK_ADD 6B Touche "addition".
• VK_MULTIPLY 6A Touche "multiplication".
• VK_NUMPAD9 69 Touche 9 (clavier numérique).
• VK_NUMPAD8 68 Touche 8 (clavier numérique).
• VK_NUMPAD7 67 Touche 7 (clavier numérique).
• VK_NUMPAD6 66 Touche 6 (clavier numérique).
• VK_NUMPAD5 65 Touche 5 (clavier numérique).
• VK_NUMPAD4 64 Touche 4 (clavier numérique).
• VK_NUMPAD3 63 Touche 3 (clavier numérique).
• VK_NUMPAD2 62 Touche 2 (clavier numérique).
• VK_NUMPAD1 61 Touche 1 (clavier numérique).
• VK_NUMPAD0 60 Touche 0 (clavier numérique).
• VK_APPS 5D Touche Windows applications (Microsoft Natural Keyboard).
• VK_RWIN 5C Touche Windows droite (Microsoft Natural Keyboard).
• VK_LWIN 5B Touche Windows gauche (Microsoft Natural Keyboard).
• VK_Z 5A Touche z
• VK_Y 59 Touche y
• VK_X 58 Touche x
• VK_W 57 Touche w
• VK_V 56 Touche v
• VK_U 55 Touche u
• VK_T 54 Touche t
• VK_S 53 Touche s
• VK_R 52 Touche r
• VK_Q 51 Touche q
• VK_P 50 Touche p
• VK_O 4F Touche o
• VK_N 4E Touche n
• VK_M 4D Touche m
• VK_L 4C Touche l
• VK_K 4B Touche k
• VK_J 4A Touche j
• VK_I 49 Touche i
• VK_H 48 Touche h
• VK_G 47 Touche g
• VK_F 46 Touche f
• VK_E 45 Touche e
• VK_D 44 Touche d
• VK_C 43 Touche c
• VK_B 42 Touche b
• VK_A 41 Touche a
• VK_9 39 Touche 9
• VK_8 38 Touche 8
• VK_7 37 Touche 7
• VK_5 35 Touche 5
• VK_6 36 Touche 6
• VK_3 33 Touche 3
• VK_4 34 Touche 4
• VK_1 31 Touche 1
• VK_2 32 Touche 2
• VK_0 30 Touche 0
• VK_HELP 2F Touche "aide".
• VK_DELETE 2E Touche "Suppression".
• VK_INSERT 2D Touche insertion.
• VK_SNAPSHOT 2C Touche impression écran.
• VK_EXECUTE 2B Touche "exécution".
• VK_SELECT 29 Touche "selection".
• VK_DOWN 28 Flèche curseur bas.
• VK_RIGHT 27 Flèche curseur droit.
• VK_UP 26 Flèche curseur haut.
• VK_LEFT 25 Flèche curseur gauche.
• VK_HOME 24 Touche "début".
• VK_END 23 Touche "fin".
• VK_NEXT 22 Touche "page bas".
• VK_PRIOR 21 Touche "page haut".
• VK_SPACE 20 Touche Espace.
• VK_ESCAPE 1B Touche Echap.
• VK_CAPITAL 14 Touche verrouillage majuscule.
• VK_PAUSE 13 Touche "Pause".
• VK_MENU 12 Touche "Alt".
• VK_CONTROL 11 Touche "Control".
• VK_SHIFT 10 Touche "Shift".
• VK_RETURN 0D Touche "Entrée".
• VK_CLEAR 0C Touche d'effacement.
• VK_TAB 09 Touche tabulation.
• VK_BACK 08 Touche retour arrière.
• VK_MBUTTON 04 Bouton du milieu de la souris (le 3ème boutton).
• VK_CANCEL 03 Control-break.
• VK_RBUTTON 02 Bouton droit de la souris.
• VK_LBUTTON 01 Bouton gauche de la souris.
• VK_F10 79 Touche f10
• VK_F11 7A Touche f11
• VK_F12 7B Touche f12
• VK_F13 7C Touche f13
• VK_F14 7D Touche f14
• VK_F15 7E Touche f15
• VK_F16 7F Touche f16
• VK_F17 80H Touche f17
• VK_F18 81H Touche f18
• VK_F19 82H Touche f19
• VK_F20 83H Touche f20
• VK_F21 84H Touche f21
• VK_F22 85H Touche f22
• VK_F23 86H Touche f23
• VK_F24 87H Touche f24
• VK_NUMLOCK 90 Touche verrouillage numérique.
• VK_SCROLL 91 Touche verrouillage défilement.
• VK_ATTN F6 Touche "Attn".
• VK_CRSEL F7 Touche "CrSel".
• VK_EXSEL F8 Touche "ExSel".
• VK_PLAY FA Touche "Play".
• VK_ZOOM FB Touche "Zoom".
• VK_NONAME FC Reservé.
• VK_PA1 FD Touche PA1.

cordialement

[krfa1]

Bonjour,

Merci pour ces infos qui m'ont bien rendu service.

Meilleures salutations et bon week-end.

Krfa1