感谢下载载精品「」   设置多级下拉菜单在平时工作学习中，经常会用到   的下拉菜单功能，这一功能的实现方法也 较为简单。 但是，如果遇到需要使用二级下拉菜单或多级下拉菜单的情况，就会 比较棘手。实现二级下拉菜单的方法也有很多，本文为大家介绍一种，供大家参考，我们将 以下面的表格为例来展开。1、首先，我们需要做一些准备工作：对每一个项目建立一个名称索引。第一级 下拉菜单的内容，选中商品类别，然后在左上角的名称位置，将名称改为我们自 定义的名称“商品类别”，   记得按回车确定。精品2、接下来选中二级下拉菜单的项，同样在左上角自定义它的名称，名称要对应 商品类别中的项。将剩余家用电器、电脑办公的项也设置好。3、然后是三级菜单的项，自定义每一个小项的名称。名称要跟二级菜单中的项对应。4、好，准备工作完成。现在设置一级菜单。选中 B5 单元格，打开数据-数据有 效性。5、在弹出的对话框中，“允许”选择 序列，“来源”中输入“ =商品类别”， 商品类别即我们之前自定义的名称，最后确定。精品6、这时我们看到，商品栏下可以通过下拉菜单选择内容了。7、接下来要设置每一项商品的二级下拉菜单。

精品选中 C5 单元格，打开数据有效性，选择序列，来源里输入“=(B5)” (   函数的含义引用，并显示其内容)，然后确定。这样， C5 单元格的    内容就会根据 B5 的内容去索引自定义的名称来显示。根据上一步的同样的方式，设置品牌下的下拉菜单，注意数据有效性“来源”中 输入“=(C5) ”。最终效果如下：到现在，三级下拉菜单就设置完成了。多级下拉菜单的原理是一样的。精品但是，有一个问题，当我们修改前一级下拉菜单时，很容易由于疏忽，导致下级 与前一级类型不符。这这时，我们希望每种类别能有一个默认的选项，会随着第一级下拉菜单变化时，自动填充。 这种要求救只能通过   VBA 来实现了。在   上右击，点击查看代码。在代码窗内，输入以下代码： Sub (   As )    ‘当工作表变化时If .Row = 5 And . = 2 Then‘如果变化的目标是 B5 (第 5 行，第 2 列)，下边用if 语句为每一项设置默认 值感谢下载载精品If (B5) = 手机数码 (C5) = (F6) (B5) = 家用电器 (C5) = (I6) (B5) = 电脑办公 (C5) = (K6)End   IfIf .Row = 5 And