Excel VBA 用户窗体通过更改名称值循环遍历组合框

Question

我在 Excel 用户窗体中有四个组合框，其中包含这些值引用：

Me.cbDesc1.Value
Me.cbDesc2.Value
Me.cbDesc3.Value
Me.cbDesc4.Value

我想做的是遍历这些组合框值，以便用变量更改数字 1-4，类似这样...

For j = 1 to 4
    cell_j_in_sheet = "Me.cbDesc" & j & ".Value"
Next j

我在单元格中看到的是字符串（例如）"Me.cbDesc1.Value"，而不是组合框中选择的实际值。我如何指示 VBA 评估 Me.cbDescj.Value 并通过每次迭代输出 cbDescj 的当前内容？

如果有更好的方法，请指教

Answer 1

您可以使用表格的 Controls 属性:

For j = 1 to 4
    cell_j_in_sheet = Me.Controls("cbDesc" & j).Value
Next j

Excel VBA userform loop through combo boxes by changing name value