从多个列表框中选择一个列表框
Choosing a listbox from multiple list boxes
我对 excel vba 有点陌生,我正在寻找有关如何使用变量选择列表框的答案。
例如我找到的代码如下:
Me.ListBox2.AddItem Me.LB_JobList.List(iCtr)
而不是 ListBox2
我希望 2 是用户从组合框中选择的另一个数字。
当前代码是:
FrameNumber = CMB_FrameNumber.Value 'number selected by user
lb = ("ListBox" & FrameNumber) 'this would = ListBox#
因此我想要类似于
的内容
Me.lb.AddItem Me.LB_JobList.List(iCtr)
上面的评论很好,但如果您想做一些更安全的事情(例如,如果您有比控件更多的可用数字),您可以遍历可用控件并检查它们的名称。
For Each contr In UserForm1.Controls
If TypeName(contr) = "ListBox" And contr.Name = ("ListBox" & FrameNumber) Then
lb = contr
End If
Next
我对 excel vba 有点陌生,我正在寻找有关如何使用变量选择列表框的答案。 例如我找到的代码如下:
Me.ListBox2.AddItem Me.LB_JobList.List(iCtr)
而不是 ListBox2
我希望 2 是用户从组合框中选择的另一个数字。
当前代码是:
FrameNumber = CMB_FrameNumber.Value 'number selected by user
lb = ("ListBox" & FrameNumber) 'this would = ListBox#
因此我想要类似于
的内容Me.lb.AddItem Me.LB_JobList.List(iCtr)
上面的评论很好,但如果您想做一些更安全的事情(例如,如果您有比控件更多的可用数字),您可以遍历可用控件并检查它们的名称。
For Each contr In UserForm1.Controls
If TypeName(contr) = "ListBox" And contr.Name = ("ListBox" & FrameNumber) Then
lb = contr
End If
Next