Discussion :

[Igloobel]

Bonjour à tous

J'aurais besoin de controler la touche TAB dans une feuille Excel.
j'ai chercher dans l'aide et KeyPress ne m'aide pas beaucoup voici ce que dit l'aide :

Un événement KeyPress ne se déclenche pas lorsque l'utilisateur appuie sur l'une des touches suivantes :
TAB.
ENTRÉE...

j'ai donc fais une recherche sur le forum et j'ai trouver un topic interessant : http://www.developpez.net/forums/vie...&highlight=tab

Celui-ci est sur VB pur et je ne connais pas voici l'extrait :

Mehdi_ab a dit

je vais te donnez les API necessaire

Code :

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

1
2
Declare Function GetAsyncKeyState Lib "User32" (ByVal vKey As Long) As Integer 
Declare Function GetKeyState Lib "User32" (ByVal nVirtKey As Long) As Integer

pour la 1er fonction ,tu passe en argument un code ascii et te renvoie une valeur differente de 0 si la touche correspondate est appuyé
La 2éme te renvoie l'etat du boutton

Si l'idée est celle du KeyLogger en Vb j'ai une source ,si tu le veux tu re

--------------------------------------------------------------------------------
zazaraignée a dit

Salut

Tu peux mettre la propriété KeyPreview à true sur une Form et récupérer les codes ascii sur l'événement KeyPress grâce au paramètre KeyAscii ou encore sur l'événement KeyUp et le parametre KeyCode.

Cependant, il est impossible d'intercepter la touche Tab avant qu'elle n'est déplacé le focus sur un champ... et que... Ben, c'est pas parfait, quoi!

Ce qu'a dit Mehdi_ab est parfaitement obscur pour moi les declare function machin ..... Je ne sais pas ce que c'est ni a quoi cela sert ? ni à quoi cela pourrait me servir

zazaraignée dis c'est impossible avant ... c'est peut-être possible après le déplacement du focus ??????

Et pour ça je ne vois pas du tout comment on peut faire

Bref j'aurais besoin de vos lumières, petit coup de main pour un autodidacte ignorant svp merci

Igloobel

[jmfmarques]

1) je ne vois pas la disponibilité de Keypress dans Excel
2) je vois par contre un Onkey intéressant...


Si, somme toute (puisque tu parles de Keypress) tu agis depuis VB et pas VBA), ce n'ezst pas l'événement KeyPress mais l'événement KeyDown qui pourra détecter la touche TAB...

Mais, compte tenu de tout ce que tu as écrit, je ne sais plus si tu "marches" avec VB ou avec VBA : dis-nous-le donc !

:

[bidou]

sinon tu peux mettre dans la feuille

Code :

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

1
2
3
4
5
6
7
Private Sub Worksheet_Activate()
    Application.OnKey "{TAB}", "MaProc"
End Sub
 
Private Sub Worksheet_Deactivate()
    Application.OnKey "{TAB}"
End Sub

Puis écrire ta procédure

Code :

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

1
2
3
Public Sub MaProc()
    MsgBox "Tab Appuyé"
End Sub

[Pierre Fauconnier]

Bonjour

En VBA, tu peux utiliser OnKey, que tu initialises quand tu le souhaites ( par exemple à l'activation de la feuille) avec la ligne

Code :

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

1
2
 
application.onkey "{TAB}", "Ma_Proc"

Dans un module standard, tu auras une procédure

Code :

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

1
2
3
4
 
sub Ma_Proc()
   msgbox "touche TAB pressée"
end sub

N'oublie pas de remettre la touche en état via

Code :

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

1
2
 
application.onkey "{TAB}"

à la désactivation de la feuille...

Ok?

Pierre Fauconnier

[Igloobel]

Merci à tous,

Effectivement OnKey est exactement ce que je voulais , et je ne connaissait pas . Merci

Pour répondre à tes questions jmfmarques :

. Donc je fonctionne qu'en VBA (que j'ai appris en autodidacte et pas en VB que je n'est pas appris )

. La fonction Keypress existe en VBA aussi. J'ai fais :
- ouvrir un classeur
- ouvrir Visual Basic editor
- tapez Keypress, puis F1
et là l'aide en ligne nous dit comment on utilise keypress et ses restrictions (voir premier post)

je travaille avec une version Excel 2000.

En tout cas merci à bidou et Pierre Fauconnier pour leurs proposition de code. Je vais mettre le tag et si j'ai des soucis avec Onkey je créerais un nouveau sujet 8)

Igloobel