如何在Excel的右鍵單擊/上下文菜單中添加自定義按鈕？

如下面的屏幕截圖所示，許多人傾向於將其常用功能添加到Excel的右鍵單擊菜單中，以便將來僅需單擊一下即可快速使用這些功能。 本文討論的是在Excel的右鍵菜單中添加自定義代碼按鈕。

使用VBA代碼將自定義按鈕添加到Excel中的上下文菜單

使用VBA代碼將自定義按鈕添加到Excel中的上下文菜單

假設您已經在Excel中創建了一個名為MyMacro的VBA腳本，現在您需要將此功能添加到上下文菜單中，以通過單擊該代碼來運行代碼。 請執行以下操作。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口，雙擊 的ThisWorkbook 在左邊 專案 窗格。 然後將以下VBA代碼複製並粘貼到 本工作簿（代碼） 窗口。

VBA代碼：將自定義按鈕添加到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

備註：在代碼中，請全部替換 “ MyMacro” 使用您在Excel中創建的宏名稱。

3。 按 其他 + Q 退出鍵 Microsoft Visual Basic for Applications 窗口。

現在返回Excel界面，右鍵單擊單元格，您將看到帶有指定名稱的新按鈕被添加到右鍵單擊菜單中，如下圖所示。 單擊該按鈕將立即觸發相應的宏。

使用 Kutools AI 解鎖 Excel 魔法

• 智慧執行：執行單元格操作、分析資料並建立圖表 - 所有這些都由簡單的命令驅動。
• 自定義公式：產生客製化公式以簡化您的工作流程。
• VBA編碼：輕鬆編寫和實作 VBA 程式碼。
• 公式解讀：輕鬆理解複雜的公式。
• 文字翻譯：打破電子表格中的語言障礙。

使用 AI 支援的工具增強您的 Excel 功能。 立即下載 並體驗前所未有的效率！

相關文章:

• H可以通過Excel中的“命令按鈕”自動插入空白新行？
• 如何在Excel中使用命令按鈕將活動工作表另存為PDF文件？
• 如何在Excel中沒有命令按鈕提示的情況下保存和關閉活動工作簿？
• 如何通過Excel中的“命令”按鈕更新或插入（當前）日期和時間？
• 在Excel中單擊一次後如何禁用按鈕？