今天下午一直比较纠结,想形成Excel筛选多选功能,发现通过 数据–数据验证–数据验证功能,只能实现 序列单选功能,如图:
在这里插入图片描述 在这里插入图片描述
而我想实现多选功能,肿么办?网上搜索,大部分是ExcelHome技术网站上大牛 蓝桥玄霜 的示例。可我按示例操作,也一直显示错误,需要调试。经过仔细研究,终于发现应该如何操作:
1、在表格中添加ListBox控件
在这里插入图片描述
通过拖拽,产生ListBox控件,然后需要将控件绑定的数据添加进去。选中控件,右键—属性,产生属性对话框
在这里插入图片描述
需要修改两个字段,ListFillRange和MultiSelect.
ListFillRange:添加数据源
MultiSelect:0单选 1多选

O了个K。保存,运行就能看到多选框了。

PS:网上示例中ListBox控件绑定数据是通过代码实现的,我尝试多次没成功,就放弃了

Set rng = ActiveSheet.Range("B7:D18") FilterField = WorksheetFunction.Match("Country", rng.Rows(1), 0) 'Tur... Private Sub UserForm_Initialize() arr = Sheets("产品表").Range("a1").CurrentRegion With ListBox 1 '设置列表框属性 .List = arr .MultiSelect = fmMultiSelectExtended Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count > 1 Then Exit Sub 代码如下所示 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count <> 1 Then End If Intersect(Target, Columns(6)).Cells.Count