ExcelVBA系列之⽤户窗体的复合框和列表控件下⾯这篇⽂章和⼤家分享⼀下在Excel VBA中⽤户窗体的复合框和列表控件。
先打开⼀个Excel⽂件，在当前⼯作表中有⼀列班级名称的数据。
点击“开发⼯具”选项卡，打开Visual Basic，在项⽬⼯程区域点击⿏标右键。
选择“插⼊”⼀个⽤户窗体，与此同时会显⽰⼀个⼯具箱，此区域中可选择需要添加的控件。
复合框控件
1. 从⼯具箱添加“复合框”控件⾄⽤户窗体。
2. 添加⼀个模块和过程，称之为“test”。
3. 在过程中写⼊代码，将班级名称添加⾄复合框控件，这⾥⽤到控件的⼀个⽅法是AddItem。
4. 为避免重复写⼊类似代码，可以使⽤循环对上⼀步的代码进⾏优化。
Sub test()
Dim i As Integer
For i = 2 To 6
UserForm1.ComboBox1.AddItemSheet3.Range("A" & i)
Next
End Sub
5. 双击⽤户窗体UserForm1，选择⽤户窗体的Activate事件，然后调⽤以上写好的test过程，即在⽤户窗体激活（或使⽤）时，则执⾏写⼊班级名称⾄复合框的过程。
6. 最后执⾏⽤户窗体之后，就可以在复合框选择各个班级。
列表框控件
vba做excel窗体录入教程1. 从⼯具箱添加“列表框”控件⾄⽤户窗体。
2. 添加⼀个模块和过程，称之为“test”；在过程中写⼊代码，将班级名称添加⾄列表框中。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。