Comment utiliser les touches de fonctions?Résolu

Question

Bonjour,

je souhaiterai les touches fonctions F1 et F5, mais je ne sait pas comme le faire. J'ai tenté de passer par les codes ASCII mais ils n'en sont apparament pas parti. 

Merci d'avance pour votre aide.

Cordialement.

cs_Galain · Accepted Answer

Private Sub Form_Load()
   Me.KeyPreview = True
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If KeyCode = VbKeyF1 Then
      ' L'action que tu désires
   End If
End Sub

Les touches F1 à F12 ont comme constantes VbkeyF1 à VbkeyF12


La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

js8bleu · Answer

Bonjour Galain et Merci pour ton aide. Le code marche très bien sans 

Private Sub Form_Load()
Me.KeyPreview = True
End Sub 

Peux-tu me dire à quoi ça sert s'il te plaît? Est-ce obligatoire?

Merci d'avance.

Cordialement.

cs_Galain · Answer

La propriété KeyPreview d'une form ou d'un contrôle permet à cette feuille ou contrôle d'intercepter les frappes au clavier. Il me semble que cette propriété est = à True lors de la création de la feuille ou du contrôle
Vérifie si cette propriété est déjà à True sur ta feuille dans les Propriétés. Si oui le code ne sert à rien

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

js8bleu · Answer

Merci beaucoup. Excellente soirée et prends bien soin de toi.

Cordialement.

Comment utiliser les touches de fonctions?

4 réponses

Votre réponse

Discussions similaires