Ribbon XML - 获取comboBox控件中选定的索引或项目ID

要获取ComboBox控件中选定的索引或项目ID，可以使用Ribbon XML中的回调函数来实现。以下是一个示例代码：

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <ribbon>
    <tabs>
      <tab id="tab1" label="My Tab">
        <group id="group1" label="My Group">
          <comboBox id="comboBox1" label="My Combo Box" getItemCount="GetItemCount" getItemID="GetItemID" onChange="OnComboBoxChange" />
        </group>
      </tab>
    </tabs>
  </ribbon>
</customUI>

在上面的代码中，我们定义了一个名为comboBox1的ComboBox控件，并指定了三个回调函数：getItemCount、getItemID和onChange。

然后，我们需要在VBA中实现这些回调函数。以下是一个示例VBA代码：

Sub GetItemCount(control As IRibbonControl, ByRef count)
    ' 获取ComboBox中的项目数量
    count = 3
End Sub

Sub GetItemID(control As IRibbonControl, index As Integer, ByRef id)
    ' 获取指定索引的项目ID
    Select Case index
        Case 0
            id = "item1"
        Case 1
            id = "item2"
        Case 2
            id = "item3"
    End Select
End Sub

Sub OnComboBoxChange(control As IRibbonControl, selectedIndex As Integer)
    ' 获取选定的索引或项目ID
    Dim id As String
    GetItemID control, selectedIndex, id
    
    ' 打印选定的索引和项目ID
    MsgBox "Selected Index: " & selectedIndex & vbCrLf & "Selected Item ID: " & id
End Sub

在上面的代码中，GetItemCount函数返回ComboBox中的项目数量。GetItemID函数根据指定的索引返回相应的项目ID。OnComboBoxChange函数在ComboBox的选项更改时被调用，并获取选定的索引或项目ID，并通过消息框显示出来。

通过以上的Ribbon XML和VBA代码，您可以实现在Ribbon中获取ComboBox控件中选定的索引或项目ID。