Discussion :

[MakSLR]

Bonjour,

Objectif utiliser les flèches de clavier dans un formulaire continue comme dans un classeur Excel.

C'est un formulaire continue onglet Détail:

J'ai un code

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  On Error Resume Next
  Select Case KeyCode
    Case 34: DoCmd.GoToRecord , , acNext, 10 'PGDOWN
    Case 40: DoCmd.GoToRecord , , acNext, 1'DOWN
    Case 33: DoCmd.GoToRecord , , acPrevious, 10 'PGUP
    Case 38: DoCmd.GoToRecord , , acPrevious, 1 'UP
  End Select
End Sub

Mais ça ne marche pas .

Et si j'applique le code sur une des donneés dans onglet Détail

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub EUR_R_KeyDown(KeyCode As Integer, Shift As Integer)
  On Error Resume Next
  Select Case KeyCode
    Case 34: DoCmd.GoToRecord , , acNext, 10 'PGDOWN
    Case 40: DoCmd.GoToRecord , , acNext, 1 'DOWN
    Case 33: DoCmd.GoToRecord , , acPrevious, 10 'PGUP
    Case 38: DoCmd.GoToRecord , , acPrevious, 1 'UP
  End Select
End Sub

Ça marche plus ou moins.

Je m'explique, quand je me balade dans les enregistrements les flèches marche très bien. Mais si j'applique une modification dans mes données ça ne marche plus. Pour reprendre la manipulation avec les flèches il faut utiliser la souris ou sur la touch entrée. Ce n'est pas pratique.

Est ce que vous pouvez m'aider svp.

Cordialement.

[tee_grandbois]

Bonjour,

Mais ça ne marche pas .

pour le faire fonctionner sur les évènements "Sur touche ..." du formulaire, il faut activer la propriété Aperçu des touches en la mettant à Oui (Onglet évènement) il exécutera en premier ces évènements.

[MakSLR]

Bonjour,

pour le faire fonctionner sur les évènements "Sur touche ..." du formulaire, il faut activer la propriété Aperçu des touches en la mettant à Oui (Onglet évènement) il exécutera en premier ces évènements.

Merci beaucoup !!!

Tu gère