Excel VBA 传递组合框中值的 ID

Question

寻求有关在 Excel VBA 中将值的 Id 传递到参数的最佳方法的建议。

本质上，我试图复制获取值而不是文本本身，例如在 html 中:

<option value="1">Option one</option>

将返回 1。我可以将 Id 连接到字符串的开头或结尾，例如:

.additem varList(0, 1) & " | " & varList(1, 1)

但我正在寻找一个“更干净”的选项，如果这有意义的话？

干杯

Answer 1

创建至少包含 2 列的组合框。可以通过 VBE 或 VBA 代码使用 ColumnCount 属性进行设置。

然后，您可以调整 ColumnWidths 属性，使其中一列的宽度为 0，这样它就不会向用户显示/可见。

当您填充组合框时，只需将 ID 放入组合框的一列中，然后将值放入另一可见列中即可。除非您调整列宽，否则界面将如下所示

使用 ComboBox 的 BoundColumn 返回适当的值，或者您可以对所选项进行一些迭代并引用索引位置:

Debug.Print Me.ComboBox.List(0, 0)  '# Display the first row item in the first column

Debug.Print Me.ComboBox1.List(0, 1)  '# Display the first row item in the SECOND column