Comment savoir si un utlisateur appuie sur une certaine touche?

Soyez le premier à donner votre avis sur cette source.

Snippet vu 26 971 fois - Téléchargée 86 fois

Contenu du snippet

Placez sur votre feuille un timer dont vous mettrez la propriété interval à 1, puis rentrez le code suivant: le programme réagira à l'appuie de la touche "a":

Source / Exemple :


Private Declare Function GetAsyncKeyState Lib "user32" (ByVal uAction As Long) As Long

Private Sub Timer1_Timer()
Dim Retour As Long
Retour = GetAsyncKeyState(65)   'a
If (Retour And 32768) <> 0 Then
'Rentrez ici le code que vouv voulez mettre lorsque l'on appuie sur la touche "a"
End If
End Sub

Conclusion :


Pour d'autres touches...

'a à z 65 à 90
'Home 36
'End 35
'Flêche vers le haut 38
'Flêche vers le bas 40
'Flêche vers la gauche 37
'Flêche vers la droite 39
'Echap 27
'Impr écran 44
'Page haut 33
'Page bas 34
'Insert 45
'F1 à F12 112 à 123
'Barre d'espace 32
'Ctrl 17
'Alt 18
'Maj 16
'Verr Num 144
'Arrêt défil 145
'Tab 9
'Shift 16

Voilà!!!

A voir également

Ajouter un commentaire

Commentaires

Messages postés
1
Date d'inscription
mardi 19 juillet 2011
Statut
Membre
Dernière intervention
24 février 2012

bonjour, est ce qu'il y a un code pour la sourie

axes X et Y + boutton droit et gauche ?

merci
Messages postés
9
Date d'inscription
mardi 23 septembre 2008
Statut
Membre
Dernière intervention
17 avril 2010

ont peut executer une procedure si lutilisateur ecrit un mot et non une seul touche presser????
Messages postés
5
Date d'inscription
vendredi 27 avril 2007
Statut
Membre
Dernière intervention
11 septembre 2008

Merci, exactement ce que je cherchais !
Messages postés
2
Date d'inscription
mardi 18 juin 2002
Statut
Membre
Dernière intervention
18 juin 2002

Il existe aussu l'évènement :

KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

en VBA (sous Excel notamment), mais qui fonctionne différemment de celui du VB, avec des possibilités en moins (impossible de détecter autre chose que des caractères imprimables).
Messages postés
3
Date d'inscription
jeudi 14 mars 2002
Statut
Membre
Dernière intervention
19 mars 2003

BIEN. Mais je cherche un moyen simple de testere si un utilisateur appui sur n'importe quelle touche du clavier. j'ai pas trouvé sauf à tester toutes les touches....
Afficher les 18 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.