Menu
Posez votre question Signaler

Action lors de l'appui sur la touche suppr [Résolu]

Messages postés
212
Date d'inscription
lundi 27 avril 2009
Dernière intervention
14 février 2019
 - - Dernière réponse : GDX
Messages postés
212
Date d'inscription
lundi 27 avril 2009
Dernière intervention
14 février 2019
 - 8 nov. 2018 à 21:41
VB / VBA Posez votre question Signaler
Bonjour,

Je souhaite exécuter la procédure Sub supprTache() lors de l'appui sur la touche "Suppr".

J'ai inséré le code suivant dans la feuille correspondante et/ou dans un module 

Sub actionPressSuppr()
Application.OnKey "{DELETE}", "supprTache"
End Sub

Mais lorsque j'appui sur la touche, rien ne se passe.

Pouvez-vous m'aider ?

Merci,

GDX
Afficher la suite 

Votre réponse

Répondre au sujet

2 réponses

Meilleure réponse
Signaler Commenter la réponse de cs_Le Pivert
Messages postés
5801
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
15 février 2019
 403
1
Merci
Bonjour,

Mettre ta macro supprTache dans un module.

Ensuite mettre dans ThisWorkbook cela: 

Option Explicit
Private Sub Workbook_Open()
Application.OnKey "{DELETE}", "supprTache "
End Sub


voilà c'est tout simple

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CommentCaMarche

CCM 58501 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_Le Pivert
Signaler Commenter la réponse de GDX
Messages postés
212
Date d'inscription
lundi 27 avril 2009
Dernière intervention
14 février 2019
 7
0
Merci
Super merci beaucoup cs_Le Pivert ça fonctionne.

Pour info, comme je voulais que cette action n'ait lieu que sur une feuille de mon classeur, j'ai mis dans la feuille en question 

Private Sub Worksheet_Activate()
    Application.OnKey "{DELETE}", "supprTache"
End Sub


et dans toute les autres 

Private Sub Worksheet_Activate()
    Application.OnKey "{DELETE}"
End Sub


je ne sais pas si c'est la manière la plus élégante de faire mais ça marche.
Commenter la réponse de GDX

Votre réponse

Répondre au sujet
Posez votre question