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

【问题标题】：Excel VBA userform loop through combo boxes by changing name valueExcel VBA用户窗体通过更改名称值循环组合框
【发布时间】：2023-03-30 09:28:01
【问题描述】：

我在 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 的当前内容？

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

【问题讨论】：

【解决方案1】：

您可以使用表单的Controls 属性：

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

【讨论】：