[VBA学习]如何在Excel的下拉选中显示多选？

我们知道，在Excel中我们可以给数据添加下拉选择框
即在数据验证当中选择序列，然后输入选择框的选择范围即可

但是这并不能够实现多选的功能
只能选择若干选择中的一项
我们可以在VBA中使用宏来添加多选框
代码如下所示

Private Sub Worksheet_Change(ByVal Target As Range)If Target.Cells.Count <> 1 Then EndIf Intersect(Target, Columns(6)).Cells.Count = 0 Then EndApplication.EnableEvents = Falsenewdata = Target.ValueApplication.Undoolddata = Target.ValueIf newdata <> "" ThenIf olddata <> "" ThenTarget.Value = olddata & "," & newdataIf InStr(olddata, newdata) > 0 ThenTarget.Value = olddataElseTarget.Value = olddata & "," & newdataEnd IfElseTarget = newdataEnd IfEnd IfApplication.EnableEvents = True
End Sub

使用方法如下图所示
其中Columns y表示的是第y列添加这样的多选下拉框
需要根据需要进行替换

[VBA学习]如何在Excel的下拉选中显示多选？相关推荐

Excel 设置下拉框-显示中文而实际数字
最近在用excel做数据的导入,显示的值和数据库存放值有所差别,需要进行翻译,这里运用excel自带的功能来实现,显示中文,实际数字. Excel 版本:2019 第一步.设置下来框显示在excel ...
Java - EasyExcel结合VBA实现Excel导出下拉多选框与单选框
需求:导出一个带有单选下拉框与多选下拉框的excel模板思路:1.使用VBA脚本设置带有多选框的模板2.使用EasyExcel给字段填充单选下拉框数据源一.创建带有多选框宏的excel模板 *.x ...
怎么在excel设置下拉菜单
在制作excel表格时,为了规范化表格填写的内容和填写人员的方便,我们需要在excel设置下拉菜单,以便于更好的管理.统计表格,分享一个怎么在excel设置下拉菜单方法. 1.打开excel表格,在这 ...
EXCEL设置下拉选项，选项带颜色
EXCEL设置下拉选项,选项带颜色老是要用,但是老是记不起来,这次自己记录下. 第一步:表格中设置你要的选项,以及对应选项的颜色. 第二步: 选中你要下拉的选项列,数据 - 插入下拉选项 - 对话框 ...
html下拉菜单换背景颜色,如何在select框下拉菜单中更改蓝色突出显示的颜色
如何在select框下拉菜单中更改蓝色突出显示的颜色如何更改此下拉菜单中的蓝色突出显示? 链接到select框演示这是代码: Select an OptionOption 1Option 2 如果 ...
java导出Excel增加下拉框选项，解决小数据量和大数据量下拉框选项的问题
文章目录 java导出Excel增加下拉框选项一.小数据量情况二.大数据量情况 java导出Excel增加下拉框选项(java结合easyExcel) 添加传参模型ConsumablesAddDT ...
Excel快速下拉多行函数式、快速选中多行数据
[1]Excel快速下拉多行函数式如图红色框选中,D1:D5000,即可以快速下拉到第5000行 [2]快速选中多行数据 shift选中双击下边框 [3]按一定概率生成随机数 =IF(RAND()& ...
Vue+SpringBoot 实现Excel表下拉框与模板文件下载
最近做的项目需要实现该功能,经过查找相关博客,故在此做整理. 一.前端 1.在A.service.js文件中 import axios from 'axios' // 业务服务上下文 const ba ...
excel表格下拉箭头_Excel 2013中缺少下拉箭头
excel表格下拉箭头 Excel 2013中缺少下拉箭头 (Missing Drop Down Arrows in Excel 2013) You can create drop down list ...

[VBA学习]如何在Excel的下拉选中显示多选？

[VBA学习]如何在Excel的下拉选中显示多选？相关推荐

最新文章

热门文章