Excelで右クリック/コンテキストメニューにカスタムボタンを追加するにはどうすればよいですか？

以下のスクリーンショットに示すように、多くのユーザーは頻繁に使用する機能をExcelの右クリックメニューに追加して、将来的にワンクリックで簡単にその機能を使用できるようにしています。この記事では、Excelの右クリックメニューにカスタムコードボタンを追加する方法について説明します。

VBAコードを使用してExcelのコンテキストメニューにカスタムボタンを追加する

VBAコードを使用してExcelのコンテキストメニューにカスタムボタンを追加する

あなたがExcelで「MyMacro」という名前のVBAスクリプトを作成済みであり、それをコンテキストメニューに追加して、クリックだけでコードを実行したいとします。以下のように操作してください。

1. Alt + F11キーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. Microsoft Visual Basic for Applicationsウィンドウで、左側のプロジェクトペインにある「ThisWorkbook」をダブルクリックします。その後、以下のVBAコードを「ThisWorkbook (Code)」ウィンドウにコピー＆ペーストします。

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. Alt + Qキーを押して、Microsoft Visual Basic for Applicationsウィンドウを終了します。

これでExcelインターフェースに戻ります。セルを右クリックすると、下のスクリーンショットに示すように、指定した名前の新しいボタンが右クリックメニューに追加されているのが確認できます。このボタンをクリックすると、対応するマクロが即座に実行されます。

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！

関連記事:

• Excelでコマンドボタンを使って空白の新しい行を自動的に挿入するにはどうすればよいですか？
• Excelでコマンドボタンを使用してアクティブなワークシートをPDFファイルとして保存するにはどうすればよいですか？
• Excelでアクティブなワークブックをプロンプトなしで保存して閉じるには、コマンドボタンを使用するにはどうすればよいですか？
• Excelでコマンドボタンを使用して（現在の）日付と時刻を更新または挿入するにはどうすればよいですか？
• Excelで一度クリックした後、ボタンを無効にするにはどうすればよいですか？