Я пытаюсь понять, как вызвать getSelectedItemID и getItemLabel для выпадающего меню в пользовательской ленте пользовательского интерфейса в Excel. Я пытаюсь построить список для раскрывающегося списка и отобразить предыдущее значение из предыдущего сеанса. Я попытался включить myribbon.invalidate в сценарий загрузки.
XML-код
<dropDown id="dropDown" label="GoTo"
onAction="Bookmark_dropdown_onAction"
getSelectedItemID="Bookmark_dropdown_getSelectedItemID"
getItemLabel="Bookmark_dropdown_getItemLabel"
getItemID="Bookmark_dropdown_getItemID"
getItemCount="Bookmark_dropdown_getItemCount">
VBA-код
Public Sub Bookmark_dropdown_getItemCount(control As IRibbonControl, ByRef returnedVal)
returnedVal = LastRow_BookMark - 1
End Sub
Public Sub Bookmark_dropdown_getItemID(control As IRibbonControl, index As Integer, ByRef id)
id = "ID Sheet: " & index
End Sub
Public Sub Bookmark_dropdown_getItemLabel(control As IRibbonControl, index As Integer, _
ByRef returnedVal)
returnedVal = BookMark_WS.Cells(index + 2, 1)
End Sub
Public Sub Bookmark_dropdown_getSelectedItemID(control As IRibbonControl, ByRef id)
id = WS.Range("SelectedBookMark")
End Sub