Action lors de l'appui sur la touche suppr

Résolu
GDX Messages postés 239 Statut Membre -  
GDX Messages postés 239 Statut Membre -
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

2 réponses

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    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
    1
  2. GDX Messages postés 239 Statut Membre 9
     
    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.
    0