Discussion :

[benejepo]

Dans un formulaire, je souhaite effectuer certaines instructions après avoir appuyer sur la touche F5.
Pour ce faire j'ai programmé ceci :

Code :

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

1
2
3
Private Sub trav_prodnum_KeyDown(vbKeyF5 As Integer, Shift As Integer)
   CAUT1.SetFocus
End Sub

Le problème est que l'action se passe non seulement pour F5 mais pour toutes les touches sur lesquelles je tape.

Où est l'erreur?
Merci

[loufab]

Bonjour,

Je ne pense pas que tu es lu les indications sur le fonctionnement de cet événement.

Il s'agit d'une interception d'une touche lors d'une action sur le clavier.

Il faut donc tester si la touche appuyée et celle que tu veux.

Télécharge l'application Chasseur d'événements sur mon espace perso, le code est ouvert et tous les événements ou presque y sont traité. Tu comprendras mieux et tu auras un exemple concret de code.

Si tu as des problèmes après ça (ce qui m'étonnerais) n'hésite pas à reposter dans ce thread.

Cordialement,

[benejepo]

Désolé mais je suis débutant et lorsque je regarde ton code, je ne vois pas où l'on peut définir quelle touche est enfoncée. Peux-tu me donner un exemple simple basé sur ma demande initiale cad une réaction si j'enfonce la touche F5 uniquement
D'avance merci

[loufab]

Ce code renvoie le code de la touche appuyé sous forme de message. Elle est passé en paramètre via Keycode.

Code :

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

1
2
3
Private Sub MonControle_KeyDown(KeyCode As Integer, Shift As Integer)
    msgbox KeyCode
End Sub

Il suffit de tester KeyCode, une structure If Endif devrait faire l'affaire.