vba给combox控件赋多值的方法？下面，小编来为大家介绍一下如何利用vba来为combox控件一次赋多个值。
工具/原料
excel
方法/步骤
1
打开excel程序，在sheet1表单A1：A4中输入值，用作为一次性赋于combox控件的值。
2
再依次在工具栏中点击“开发工具”——“Visual Basic”或直接按快捷键'Alt+F11'，打开“Microsoft Visual Basic”窗口。
3
在“Microsoft Visual Basic”窗口中，点击“插入”——“用户窗体”，并如下图所示，在用户窗体上分别添加一个“ComboBox”组件和一个'CommandButton1'组件。
4
双击窗口中的按钮，打开代码编辑窗口，如下图所示输入以下代码：Me.CmbxCity.RowSource = 'sheet1!a1:a4'
5
按“F5”运行vba代码，在运行后窗口中点击按钮，然后再点击“ComboBox”控件，下拉框中就可以看到sheet1表中的A1:A4的值了。
6
我们还可以如下更换按钮中的代码，运行后，同样可以实现给“ComboBox”控件赋多值的效果： Dim ListCity ListCity = ThisWorkbook.Sheets(1).Range('a1:a4') Me.CmbxCity.List = ListCity
7
除了可以将sheet表单中的值一次性赋给'ComboBox”控件外，我们也可以自定义赋值内容，如下，首先定义了一个变量，先给它赋值成list对象，最后再将它的值赋给'ComboBox”控件，实现了赋多值。 Dim ListCity ListCity = [{'北京';'天津';'河北';'河南'}] Me.CmbxCity.List = ListCity