请教VBA编程关于listbox的一个小问题

来源：百度知道 编辑：UC知道 时间：2024/06/25 09:42:12
我在用VBA编程时遇到一个问题，我想在Excel页面里连续3个中各加入一个listbox，每个的初始值是一样的，我用的代码如下
With ListBox1
ListBox1.Clear
.AddItem "haut"
.AddItem "bas"
End With
如此重复3遍，我想用一个for循环代替，但是却不能用ListBox(i)之类的语句代替，请问改如何做呢？谢谢了
连续3个空格中

VBA里可没有控件数组哈

ThisWorkbook里
Sub tt()
For i = 1 To 3
Me.Sheets(i).ListBox1.AddItem 1
Next i
End Sub

你把listBox创建成控件数组就可以了
调用时:

listBox(0)
listBox(1)
listBox(2)

循环时把0,1,2换成i