combobox - Excel VBA组合框返回索引不是值

Question

我在 Excel 2007 中设置了一个组合框，它从另一个工作表中收集其列表项。当我尝试通过宏访问所选项目的值时，返回的只是索引值而不是实际值。

DateDropDown = Sheets("Input Form").Shapes("APPDateDropDown").ControlFormat.Value

组合框中的值列为“Jan-12”，但是当我运行上面的代码时 DateDropDown 返回为 37（项目的索​​引）。

如何让它返回值“Jan-12”？

Answer 1

With Sheets("Input Form").Shapes("APPDateDropDown")
    DateDropDown = .ControlFormat.List(.ControlFormat.ListIndex)
End With