订阅vba给combox控件赋多值的方法
来源：网络收集 点击： 时间：2024-03-02打开excel程序，在sheet1表单A1：A4中输入值，用作为一次性赋于combox控件的值。
2/7再依次在工具栏中点击“开发工具”——“Visual Basic”或直接按快捷键Alt+F11，打开“Microsoft Visual Basic”窗口。
3/7在“Microsoft Visual Basic”窗口中，点击“插入”——“用户窗体”，并如下图所示，在用户窗体上分别添加一个“ComboBox”组件和一个CommandButton1组件。
4/7双击窗口中的按钮，打开代码编辑窗口，如下图所示输入以下代码：
Me.CmbxCity.RowSource = sheet1!a1:a4
5/7按“F5”运行vba代码，在运行后窗口中点击按钮，然后再点击“ComboBox”控件，下拉框中就可以看到sheet1表中的A1:A4的值了。
6/7我们还可以如下更换按钮中的代码，运行后，同样可以实现给“ComboBox”控件赋多值的效果：
Dim ListCity
ListCity = ThisWorkbook.Sheets(1).Range(a1:a4)
Me.CmbxCity.List = ListCity
7/7除了可以将sheet表单中的值一次性赋给ComboBox”控件外，我们也可以自定义赋值内容，如下，首先定义了一个变量，先给它赋值成list对象，最后再将它的值赋给ComboBox”控件，实现了赋多值。
Dim ListCity
ListCity =
Me.CmbxCity.List = ListCity
编程语言VBA 版权声明：
1、本文系转载，版权归原作者所有，旨在传递信息，不代表看本站的观点和立场。
2、本站仅提供信息发布平台，不承担相关法律责任。
3、若侵犯您的版权或隐私，请联系本站管理员删除。
4、文章链接：http://www.1haoku.cn/art_211352.html
