VBA中的列表框（示例）|如何在Excel中创建列表框？
VBA中的列表框是分配给变量的列表，并且该列表具有多种输入可供选择，我们可以从列表框中一次选择多个选项，通过选择列表可以将列表框制作为excel VBA中的用户窗体框选项并将其绘制在列表框的用户窗体上，我们有一个命名范围，其中提供了要在列表框中选择的某些值。
什么是Excel VBA中的列表框？
列表框是用户可以从中选择项目的列表。如果要显示用户可以选择的值列表，则可以使用Excel VBA中的列表框。
如何在Excel中创建列表框？
若要在excel工作表中创建列表框，请按照下列步骤操作：
首先，您需要启用功能区上可见的“开发人员”选项卡，以便可以访问VBA和ActiveX控件命令。为了得到 开发者 标签，调出 Excel选项 对话框，单击 定制 Excel中的功能区，然后选择开发者复选框。
- 单击Excel功能区，然后选择“开发人员”选项卡，然后单击“插入”，再单击“列表框”控件，以在Excel工作表中插入新的列表框。
- 之后，在excel工作表中绘制一个矩形，以在excel中创建列表框。
- 在Excel中选择“列表框”时，单击“开发人员”选项卡，然后选择“属性”。将打开“属性”窗口。
- 在“属性”窗口中，对于“列表填充范围”设置，输入“天”-带有工作日的命名范围。
- 单击Multi Select属性，然后从下拉列表中选择1-fmMultiSelectMulti，如下面的屏幕截图所示。
- 单击“列表样式”属性，然后从下拉列表中选择1-fmListStyleOption。如下面的屏幕截图所示，这会将复选框添加到列表项的左侧。
- 关闭“属性”窗口。
您可以在单击“设计模式”时关闭“设计模式”。
如何在Excel VBA中创建列表框？
您可以考虑以下示例，以更好地了解VBA列表框：
您可以在此处下载此列表框Excel模板–列表框Excel模板
范例＃1
要将此列表框链接到单元格，请右键单击列表框（确保已选择设计模式），然后单击“属性”。如下图所示，为链接的单元格填写B17。
月列表名称为月转到属性，然后选择列表填充范围作为月。
当您在列表框中更改选择时，数据将在单元格B17单元格中更改，如下面的屏幕快照所示。
示例2 –如何在用户窗体上创建列表框？
- 转到“开发人员”选项卡，然后从“代码”中单击“ Visual Basic”或按Alt + F11。
- 转到“插入”菜单，单击“用户窗体”。
- 从工具箱中的用户窗体上拖动列表框控件。
- 双击用户窗体，然后选择用户窗体事件，如下面的屏幕快照所示。
- 现在，将以下代码添加到中间过程中。
私人子UserForm_Initialize（）
ListBox1.AddItem“ MBA”
ListBox1.AddItem“ MCA”
ListBox1.AddItem“ MSC”
ListBox1.AddItem“ MECS”
ListBox1.AddItem“ CA”
结束子
- 现在，按“ F5”运行代码。
Example＃3 –如何添加动态列表框控件
使用VBA在用户窗体上添加动态列表框控件
- 从工具箱在用户窗体上添加命令按钮。
- 右键单击命令按钮，单击属性
- 将命令按钮标题更改为“ Create_Listbox”
- 双击命令按钮
- 现在，它显示以下代码。
私人子CommandButton1_Click（）
结束子
- 调用以下名为“ Add_Dynamic_Listbox”的过程，并找到以下过程来运行。
子Add_Dynamic_Listbox（）
“添加动态列表框并将其分配给对象” LstBx”
设置LstBx = UserForm3.Controls.Add（“ Forms.ListBox.1”）
‘列表框位置
LstBx.Left = 20
LstBx.Top = 10
结束子
- 现在，单击F5运行宏。
如何在VBA中将项目添加到列表框控件？
私人子插入_Items _To_LstBox（）
ListBox1.AddItem“项目1”
ListBox1.AddItem“项目2”
ListBox1.AddItem“项目3”
ListBox1.AddItem“项目4”
ListBox1.AddItem“项目5”
结束子
如何使用VBA从列表框控件中清除项目？
子Clr_LstBx（）
UserForm3.ListBox1.Clear
结束子
例子＃4
假设我们有一个销售数据，并且希望通过选择列表框项目选择来获得图形用户界面的销售明细。然后，我们必须将选择索引单元格更改为单元格链接，并应用VLOOKUP公式来获取销售详细信息，如以下屏幕截图所示。
关于Excel VBA列表框的注意事项
Excel中的列表框可用于从中选择多个项目。
