1

我希望有人对此有所了解...我了解如何根据单元格将 Excel CustomUI 功能区下拉列表更新为默认值...以下方法完美运行，但以下引用的单元格“AX6”可以更新通过用户表单。我希望功能区下拉刷新/更新并反映在用户表单中选择的内容（用户表单只会使用反映 XML 代码中下拉列表的值更新单元格“AX6”）......是否有可能调用下面的 VB 子和功能区下拉更新？我似乎无法找到一种方法来调用带有“控件作为 IRibbonControl”的子而不出错，而且我不确定子语句中声明的变量是否会引发另一个扳手...对此有任何帮助非常感激！！

XML:

<dropDown id="chooseFilter" showLabel="true" label="LOB" getSelectedItemID="GetSelectedItemID"
onAction="OnAction" tag="SkillDetail4" getEnabled="GetEnabledMacro">

VB：

Private mCurrentItemID As Variant
------------------------------------------------------------------------
Sub GetSelectedItemID(control As IRibbonControl, ByRef itemID As Variant)
  If IsEmpty(mCurrentItemID) Then
    mCurrentItemID = Worksheets("Skill Detail").Range("AX6").Value
  End If
  itemID = mCurrentItemID
End Sub
4

0 回答 0