Excel 2010セル内のカスタム右クリックメニュー

Question

解決策を見つけるまでに何時間も費やされました。 右クリックメニューにカスタムアクションを追加しようとしましたが、セルを編集モードで入力しているときはいつですか。 すべてのトピックでは、右クリックメニューにアクションを追加する方法を説明しますが、セルを選択したときには、そのセルを選択していないときにのみ選択します。

あなたが編集モードで右クリックしたときにこれは私の個人的な右クリックメニュー

このコンテクストメニューです：

標準の右クリックメニューの[マイコード：

Public Function addMenu(menuName As String, menuActionMacro As String, pictureFaceId As Integer, beginGroup As Boolean) 

    If checkMenuNotExist(menuActionMacro) Then 
     Dim cbButt As CommandBarButton 
     Dim cb As CommandBar 

     Set cb = Application.CommandBars("cell") 
     Set cbButt = cb.Controls.Add(msoControlButton, Temporary:=True) 

     cbButt.beginGroup = beginGroup 
     cbButt.Caption = menuName 
     cbButt.OnAction = menuActionMacro 
     cbButt.FaceId = pictureFaceId 
     cbButt.Tag = menuActionMacro 

    End If 
End Function 

誰かが編集右クリックメニューでアクションを追加する方法はありますか？

Answer 1

私は自分のMenuRighterアドインとその "Show Labels on Menus"機能を使用して、関心のあるコンテキストメニューが＃58であり、 "フォーミュラバー"と判断しました。 1つは変更可能だとは思っていませんでしたが、Fileメニューを追加することができました。

ので、この試してみてください。

Public Function addMenu(menuName As String, menuActionMacro As String, pictureFaceId As Integer, beginGroup As Boolean) 

    If checkMenuNotExist(menuActionMacro) Then 
     Dim cbButt As CommandBarButton 
     Dim cb As CommandBar 

     Set cb = Application.CommandBars("Formula Bar") 
     Set cbButt = cb.Controls.Add(msoControlButton, Temporary:=True) 

     cbButt.beginGroup = beginGroup 
     cbButt.Caption = menuName 
     cbButt.OnAction = menuActionMacro 
     cbButt.FaceId = pictureFaceId 
     cbButt.Tag = menuActionMacro 

    End If 
End Function