专栏名称: 秋叶PPT

你爱学习，爱动手，爱分享？关注我们就对了！PPT、Excel、Word、职场成长，每天早上三分钟，碎片时间学起来！

目录

相关文章推荐

秋叶PPT · 别羡慕我，只要你有公众号，也能打造自己的AI ... · 昨天

旁门左道PPT · PPT太空，领导一张图都不让加，咋弄？ · 2 天前

秋叶PPT · 牛X！AI汉语新解爆火全网，网友直接炸锅了， ... · 5 天前

秋叶PPT · 原来写10w+的爆文这么简单！这个AI神操作 ... · 6 天前

秋叶PPT · 第一批用AI做PPT的人，已经碾压同事了…… · 1 周前

51好读 › 专栏 › 秋叶PPT

比下拉列表强10倍！它才是Excel中数据录入的No.1

秋叶PPT · 公众号 · PPT · 2024-09-29 08:17

正文

点击👆关注【秋叶 Excel】

发送【6】

领取秋叶 Excel 6 年精选文章合集

作者：绿水零

审核：小爽

编辑：雅梨子、卫星酱

大家好！我是最近又开始倒腾 VBA 的绿水零。

作为一名资深表姐，我在日常工作中，肯定是少不汇总数据了的。

例如年终汇总大家的福利什么的，让大家从福利清单中选几样，汇总起来就是这个样子↓↓↓

虽然福利列表（可以选的福利）都是相同的，但每个人选的福利组合并不相同。

要手动一个一个输入？【Ctrl+C】&【Ctrl+V】？

不可能的，不可能的，肯定有更方便的方法的。

从相同的列表选项中选取不同组合，这不就是多选题（多选的下拉列表）吗？

那怎么在 Excel 中简单制作，添加选项简便又快捷的——下拉多选列表呢！

噔噔蹬蹬，照例先看看效果图：

（以下方法适用于有 VBA 的 Excel，演示使用的是 Office 365。）

解决方法

❶ 既然是下拉列表，那我们第一步就先来添加一个列表。

点击【开发工具】选项卡-【插入】-ActiveX 控件-列表框。

注意：是 ActiveX 控件，不是表单控件。

❷ 随手画一个列表框，大小位置随意，画完之后，再次点击【开发工具】选项卡-「设计模式」，退出「设计模式」。

「设计模式」按钮由灰色变回白色，则表明已退出。

❸ 新建工作表「data」，在 A1 单元格输入下拉选项的标题，A2 及以下的单元格输入选项内容。

❹ 回到 Sheet1 工作表，使用快捷键【Alt+F11】打开 VBA 编辑器，双击需要添加多选列表的工作表（此处是 Sheet1），然后将相关的 VBA 代码黏贴到代码窗口。

最后关闭 VBA 编辑器。

（VBA 代码获取方式见文末。）

这样多选下拉列表就搞定了，接下来我们看看效果。

结果演示

现在我们就可以点击单元格，打开多选下拉列表，然后通过点击列表的选项，快速输入不同的选项组合。

（VBA 代码预留了第一行是标题，因此点击第一行不会出现下拉列表。）

除了以上功能外，通过在 data 工作表中增减或修改选项，可以快速修改下拉列表的选项内容，Sheet1 工作表中的列表框会自动更新选项。

data 工作表中的 A 列对应 Sheet1 工作表中 A 列的列表框，data 工作表中的 B 列对应 Sheet1 工作表中 B 列的列表框，以此类推。

如果 data 工作表中 A 列不填写任何内容，则 Sheet1 中的对应列也不会出现多选列表框。

因此，可以根据自己的需求，在任意列添加多选列表。

注意事项

❶ 如果你发现 Excel 没有【开发工具】选项卡，可以单击【文件】-「选项」-「自定义功能区」-「主选项卡」，找到「开发工具」并勾选。

❷ 设置列表选项的工作表（案例中的 data 工作表）必须命名为 data。

❸ 添加了 VBA 代码的文件，建议将文件格式保存为"启用宏的工作簿(*.xlsm)"，这样下次打开时，VBA 的功能才能正常使用。

关注公众号【秋叶 Excel】

后台回复关键词：多项选择

即可下载案例文件（包含 VBA 代码哦）

👇👇👇

今日份小知识——下拉多选列表已送达，收到的小伙伴们点个在看吧~

看完本文，是不是直呼「涨见识了！！！」

如果你还想学习更多 Excel 里好用高效的小技巧，欢迎你加入秋叶 Excel 3 天集训营！

不限年龄！不限岗位！不限基础！都可以学！

《秋叶 Excel 3 天集训营》

原价 99 元

新课上线

而且现在免费报名！

视频+图文笔记+作业实操+助教答疑

Excel 和 WPS 双软件教学

赶紧长按下图识别二维码

抢占学习名额吧！

👇

❤

点击下方卡片👇

关注【秋叶 Excel】，发送【6】

领取秋叶 Excel 6 年精选文章合集

↓↓↓

推荐文章

秋叶PPT · 别羡慕我，只要你有公众号，也能打造自己的AI数字分身

昨天

旁门左道PPT · PPT太空，领导一张图都不让加，咋弄？

2 天前

秋叶PPT · 牛X！AI汉语新解爆火全网，网友直接炸锅了，纷纷效仿！

5 天前

秋叶PPT · 原来写10w+的爆文这么简单！这个AI神操作你确定不来试一下？

6 天前

秋叶PPT · 第一批用AI做PPT的人，已经碾压同事了……

1 周前

美美耶 · 骗子假装前女友骗钱，结果……

7 年前

LOGO大师 · 最强毕业季06期 |《羊城》人仙共处的“粤”文化

7 年前

郎club · 中国人在巴被绑惨剧真相：一韩国人害的!

7 年前

小鹿情感先生 · 该去深挖女友的过去吗

7 年前

泰科钢铁 · 荐书｜东北大学姜周华教授等编著《电渣冶金学》

7 年前

Sov5搜索 · 小百科 · 移动版

51好读 - 好文章就要读起来!