养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

vba给combox控件赋多值的方法

时间:2024-11-01 05:47:41

vba给combox控件赋多值的方法?下面,小编来为大家介绍一下如何利用vba来为combox控件一次赋多个值。

工具/原料

excel

方法/步骤

1、打开excel程序,在sheet1表单A1:A4中输入值,用作为一次性赋于combox控件的值。

vba给combox控件赋多值的方法

2、再依次在工具栏中点击“开发工具”——“VisualBasic”或直接按快捷键"Alt+F11",打开“MicrosoftVisualBasic”窗口。

vba给combox控件赋多值的方法

3、在“MicrosoftVisualBasic”窗口中,点击“插入”——“用户窗体”,并如下图所示,在用户窗体上分别添加一个“ComboBox”组件和一个"CommandButton1"组件。

vba给combox控件赋多值的方法

4、双击窗口中的按钮,打开代码编辑窗口,如下图所示输入以下代码:Me.CmbxCity.RowSource="sheet1!a1:a4"

vba给combox控件赋多值的方法

5、按“F5”运行vba代码,在运行后窗口中点击按钮,然后再点击“ComboBox”控件,下拉框中就可以看到sheet1表中的A1:A4的值了。

vba给combox控件赋多值的方法

6、我们还可以如下更换按钮中的代码,运行后,同样可以实现给“ComboBox”控件赋多值的效果:DimListCityListCity=ThisWorkbook.Sheets(1).Range("a1:a4")Me.CmbxCity.List=ListCity

vba给combox控件赋多值的方法

7、除了可以将sheet表单中的值一次性赋给"ComboBox”控件外,我们也可以自定义赋值内容,如下,首先定义了一个变量,先给它赋值成list对象,最后再将它的值赋给"ComboBox”控件,实现了赋多值。DimListCityListCity=[{"北京";"天津";"河北";"河南"}]Me.CmbxCity.List=ListCity

vba给combox控件赋多值的方法

vba给combox控件赋多值的方法

© 一点知识