Comment ajouter un bouton personnalisé au clic droit / menu contextuel 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 contextuel d'Excel afin d'utiliser rapidement ces fonctions en un seul clic à l'avenir. Cet article parle de l'ajout d'un bouton de code personnalisé au menu contextuel dans Excel.

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

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

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

1. appuie sur le autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez Ce classeur à gauche Projet vitre. Et puis copiez et collez le code VBA ci-dessous dans le Ce classeur (code) fenêtre.

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

Notes: Dans le code, veuillez tout remplacer «MyMacro» avec le nom de la macro que vous avez créé dans votre Excel.

3. appuie sur le autre + Q touches pour quitter Microsoft Visual Basic pour applications fenêtre.

Maintenant, vous revenez à l'interface Excel, après avoir cliqué avec le bouton droit sur une cellule, vous verrez que le nouveau bouton avec le nom spécifié est ajouté dans le menu contextuel comme illustré ci-dessous. Cliquez sur le bouton pour déclencher immédiatement la macro correspondante.

Articles connexes:

• HComment insérer automatiquement une nouvelle ligne vierge par le bouton de commande dans Excel?
• Comment utiliser le bouton de commande pour enregistrer la feuille de calcul active en tant que fichier PDF dans Excel?
• Comment enregistrer et fermer le classeur actif sans invite par un bouton de commande dans Excel?
• Comment mettre à jour ou insérer la date et l'heure (actuelles) par un bouton de commande dans Excel?
• Comment désactiver le bouton après avoir cliqué une fois dans Excel?