Keycode vbKeyControl et vbKeyRight simultanément.

Résolu/Fermé

Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024 - Modifié le 20 juin 2022 à 10:00
NHenry Messages postés 15214 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 16 avril 2025 - 20 juin 2022 à 19:20

Bonjour,

Je n'arrive pas à récupérer cette saisie clavier lorsque je suis dans texbox1:

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

if  KeyCode = vbKeyControl and KeyCode = vbKeyRight then
msgbox "Détection OK"

end if
End Sub

Configuration: Configuration: Windows / Chrome 102.0.0.0

A voir également:

Keycode vba
Excel compter cellule couleur sans vba - Guide
Mkdir vba ✓ - Forum VB / VBA
L'indice n'appartient pas à la sélection vba ✓ - Forum Programmation
Autofill vba ✓ - Forum Excel
Vba range avec variable ✓ - Forum VB / VBA

2 réponses

Réponse 1 / 2

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
20 juin 2022 à 10:55

Bonjour Sormick, bonjour le forum,

L'événement KeyDown ne s'applique, il me semble, qu'à une seule touche et pas à une combinaison. Mais voyons ce qu'en disent les balaises qui rôdent par ici...

Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024
20 juin 2022 à 11:12

Merci. Il y a t'il un autre moyen de détecter la combinaison de ces touches par exemple avec un autre évènement?

Sormick Messages postés 146 Date d'inscription dimanche 10 novembre 2013 Statut Membre Dernière intervention 22 septembre 2024
20 juin 2022 à 11:46

Bonjour,

J'ai finalement réussi à détecter la combinaison des deux touches en faisant:
if Shift = 2 And vbKeyRight Then

Réponse 2 / 2

NHenry Messages postés 15214 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 16 avril 2025 363
20 juin 2022 à 19:20

En effet, l'événement KeyDown ne s'applique qu'à une seule touche (peut être exception faites des modificateurs : Alt, Shift, Ctrl) .

Pour faire ce que tu veux avec cette méthode, il te faut mémoriser quelle touches a été pressée (grace à KeyDown) et les oublier quand l'événement KeyUp correspondant est généré.

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

Méthode find dans VBA - Recherche de données sous Excel

ouverture d'un fichier excel à partir d'un code VBA

appliquer une pause dans une macro vba excel