Excel 2010自定義單元格內的單擊菜單

我花了很多小時才找到解決方案，但沒有成功。我嘗試在右鍵單擊菜單中添加自定義操作，但是在編輯模式下輸入單元格時。所有主題都解釋瞭如何在右鍵單擊菜單中添加操作，但僅在您選擇單元格時纔會添加操作。Excel 2010自定義單元格內的單擊菜單

這是我個人的右鍵菜單 This is my personnal right-clik menu

這上下文菜單中，當你在編輯模式下用鼠標右鍵單擊： This the contextual menu when you right-clik in edition mode

我對標準的右鍵菜單代碼：

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

有人如何在編輯右鍵菜單中添加動作？

來源

2016-03-25 m4m4

我用我的MenuRighter加載項及其「在菜單上顯示標籤」功能來確定您感興趣的上下文菜單是＃58並稱爲「公式欄」。我不認爲這是可變的，但我能夠將文件菜單添加到它。

那麼試試這個：

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

來源

2016-03-25 16:07:57

謝謝，但我需要分享與所有員工（+500）這個文件，並與GPO，我不能每個計算機 – m4m4

我覺得你的問題是在安裝特定的補充如何使用VBA添加到單元格編輯菜單。這就是我的答案顯示。你嘗試過運行VBA嗎？如果這不是問題，請澄清。你不需要安裝我提到的加載項 - 這正是我用來發現你想要修改的快捷菜單被稱爲「公式欄」。 –

Excel 2010自定義單元格內的單擊菜單

回答

相關問題