Excel多级下拉菜单技巧.docx

《Excel多级下拉菜单技巧.docx》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、「Excel」Excel设置多级下拉菜单在平时工作学习中，经常会用到Excel的下拉菜单功能，这一功能的实现方法也较为简单。但是，如果遇到需要使用二级下拉菜单或多级下拉菜单的情况，就会比较棘手。实现二级下拉菜单的方法也有很多，本文为大家介绍一种，供大家参考，我们将以下面的表格为例来展开。1、首先，我们需要做一些准备工作：对每一个项目建立一个名称索引。第一级下拉菜单的内容，选中商品类别，然后在左上角的名称位置，将名称改为我们自定义的名称“商品类别”，记得按回车确定。2、接下来选中二级下拉菜单的项，同样在左上角自定义它的名称，名称要对应商品类别中的项。

2、将剩余家用电器、电脑办公的项也设置好。3、然后是三级菜单的项，自定义每一个小项的名称。名称要跟二级菜单中的项对应。4、好，准备工作完成。现在设置一级菜单。选中B5单元格，打开数据-数据有效性。5、在弹出的对话框中，“允许”选择序列，“来源”中输入“=商品类别”，商品类别即我们之前自定义的名称，最后确定。6、这时我们看到，商品栏下可以通过下拉菜单选择内容了。7、接下来要设置每一项商品的二级下拉菜单。选中C5单元格，打开数据有效性，选择序列，来源里输入“=INDIRECT(B5)”（indirect函数的含义引用，并显示其内容），然后确定。这样，C5单

3、元格的内容就会根据B5的内容去索引自定义的名称来显示。根据上一步的同样的方式，设置品牌下的下拉菜单，注意数据有效性“来源”中输入“=INDIRECT(C5)”。最终效果如下：到现在，三级下拉菜单就设置完成了。多级下拉菜单的原理是一样的。但是，有一个问题，当我们修改前一级下拉菜单时，很容易由于疏忽，导致下级与前一级类型不符。这时，我们希望每种类别能有一个默认的选项，会随着第一级下拉菜单变化时，自动填充。这种要求救只能通过EXCELVBA来实现了。在sheet1上右击，点击查看代码。在代码窗内，输入以下代码：PrivateSubWorksheet_Ch

4、ange(ByValTargetAsRange)‘当工作表变化时IfTarget.Row=5AndTarget.Column=2Then‘如果变化的目标是B5（第5行，第2列），下边用if语句为每一项设置默认值IfRange("B5")="手机数码"ThenRange("C5")=Range("F6")ElseIfRange("B5")="家用电器"ThenRange("C5")=Range("I6")ElseIfRange("B5")="电脑办公"ThenRange("C5")=Range("K6")EndIfEndIfIfTarget.Row=

5、5AndTarget.Column=3Then‘如果变化的目标是C5（第5行，第3列），下边用case语句设置默认值（采用if还是case，请灵活掌握）SelectCaseRange("C5")Case"手机"Range("D5")=Range("F7")Case"存储卡"Range("D5")=Range("G7")Case"移动电源"Range("D5")=Range("H7")Case"微波炉"Range("D5")=Range("I7")Case"空调"Range("D5")=Range("J7")Case"平板"Range("D5")=R

6、ange("K7")Case"笔记本"Range("D5")=Range("L7")EndSelectEndIfEndSub有兴趣，有需要的试试吧。仅供交流，大家多批评指正。谢谢！