Динамическое заполнение dynamicMenu в Excel UI Ribbon

Я хочу заполнить dynamicMenu в пользовательской ленте Excel из списка на листе. Мой код XML это:

<dynamicMenu id="A" label="Menu A" imageMso="FormatPainter" getContent="GetMenuContent" />

Я могу видеть меню. Чего у меня нет, так это обратного вызова GetMenuContent, но я понимаю, что в этом месте макрос для заполнения меню должен работать правильно?

1 ответ

Решение

Решено! Получил ответ по этой ссылке.

просто направьте инструкцию getContent в этот макрос:

Sub GetContent(control As IRibbonControl, ByRef returnedVal)
    Dim xml As String

    xml = "<menu xmlns=""http://schemas.microsoft.com/office/2009/07/customui"">" & _
          "<button id=""but1"" imageMso=""Help"" label=""Help"" onAction=""HelpMacro""/>" & _
          "<button id=""but2"" imageMso=""FindDialog"" label=""Find"" onAction=""FindMacro""/>" & _
          "</menu>"

    returnedVal = xml
End Sub

Sub HelpMacro(control As IRibbonControl)
    MsgBox "Help macro"
End Sub

Sub FindMacro(control As IRibbonControl)
    MsgBox "Find macro"
End Sub
Другие вопросы по тегам