Private Sub Form_Load() Me.KeyPreview = True 'intercepte les frappes clavier End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode vbKeyF1 Then Command2.Value True End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question