Comment ajouter un bouton personnalisé au menu contextuel/clic droit dans Excel ?

Comme le montrent les captures d'écran ci-dessous, de nombreuses personnes ont tendance à ajouter leurs fonctions fréquemment utilisées au menu clic droit d'Excel afin de pouvoir utiliser ces fonctions rapidement en un seul clic à l'avenir. Cet article traite de l'ajout d'un bouton de code personnalisé au menu clic droit dans Excel.

Ajouter un bouton personnalisé au menu contextuel dans Excel avec du code VBA

Ajouter un bouton personnalisé au menu contextuel dans Excel avec du code VBA

Supposons que vous ayez créé un script VBA nommé MyMacro dans votre Excel, et maintenant vous devez ajouter cette fonction au menu contextuel pour exécuter le code simplement en cliquant dessus. Veuillez procéder comme suit.

1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.

2. Dans la fenêtre Microsoft Visual Basic for Applications, double-cliquez sur ThisWorkbook dans le volet Projet à gauche. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre ThisWorkbook (Code).

Code VBA : Ajouter un bouton personnalisé au menu contextuel dans Excel

Private Sub Workbook_Deactivate()
    On Error Resume Next
        With Application
            .CommandBars("Cell").Controls("MyMacro").Delete
        End With
    On Error GoTo 0
End Sub

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
    Dim cmdBtn As CommandBarButton
    On Error Resume Next
        With Application
            .CommandBars("Cell").Controls("MyMacro").Delete
            Set cmdBtn = .CommandBars("Cell").Controls.Add(Temporary:=True)
        End With

        With cmdBtn
           .Caption = "MyMacro"
           .Style = msoButtonCaption
           .OnAction = "MyMacro"
        End With
    On Error GoTo 0
End Sub

Remarque : Dans le code, veuillez remplacer tous les « MyMacro » par le nom de Macro que vous avez créé dans votre Excel.

3. Appuyez sur les touches Alt + Q pour quitter la fenêtre Microsoft Visual Basic for Applications.

Maintenant, vous revenez à l'interface Excel, après avoir fait un clic droit sur une cellule, vous verrez que le nouveau bouton avec le nom spécifié est ajouté dans le menu contextuel comme le montre la capture d'écran ci-dessous. Cliquer sur le bouton déclenchera immédiatement la Macro correspondante.

Découvrez la magie d'Excel avec Kutools AI

• Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
• Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
• Codage VBA : Écrivez et implémentez du code VBA sans effort.
• Interprétation des formules : Comprenez facilement des formules complexes.
• Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.

Améliorez vos capacités Excel avec des outils alimentés par l'IA. Téléchargez maintenant et découvrez une efficacité sans précédent !

Articles connexes :

• Comment insérer automatiquement une nouvelle ligne vide via un bouton de commande dans Excel ?
• Comment utiliser un bouton de commande pour enregistrer la feuille de calcul active sous forme de fichier PDF dans Excel ?
• Comment enregistrer et fermer le classeur actif sans invite via un bouton de commande dans Excel ?
• Comment mettre à jour ou insérer la date et l'heure (actuelles) via un bouton de commande dans Excel ?
• Comment désactiver un bouton après un seul clic dans Excel ?