Excel二级联动下拉列表（横向字典配置）

**Excel 二级联动下拉列表（横向字典配置）**

在 Excel 中，二级联动下拉列表是一种常见的数据分析工具。它可以帮助我们快速地根据上一级选择的值来筛选出相关的数据。在本文中，我们将介绍如何使用 Excel 来实现二级联动下拉列表（横向字典配置）。

**准备工作**

在开始之前，我们需要准备好以下几点：

1. **Excel 版本**: 本文基于 Excel2016 或更高版本。
2. **数据源**: 我们需要一个包含相关数据的表格，例如产品信息、客户信息等。
3. **下拉列表配置**: 我们需要在 Excel 中创建两个下拉列表控件，一级选择控件和二级选择控件。

**步骤1：创建一级选择控件**

首先，我们需要创建一个一级选择控件。这个控件将用于选择产品类别。

1. 在 Excel 中，选择一个单元格作为一级选择控件的位置。
2. 点击 "数据" > "下拉列表" > "从范围中创建下拉列表"。
3.选择一个包含产品类别信息的表格区域（例如 A1:A10）。
4. 单击 "确定"。

**步骤2：创建二级选择控件**

接下来，我们需要创建一个二级选择控件。这个控件将用于根据一级选择控件的值来筛选产品信息。

1. 在 Excel 中，选择一个单元格作为二级选择控件的位置。
2. 点击 "数据" > "下拉列表" > "从范围中创建下拉列表"。
3.选择一个包含产品信息的表格区域（例如 B1:B100）。
4. 单击 "确定"。

**步骤3：配置二级联动**

现在，我们需要配置二级联动功能。这个功能将根据一级选择控件的值来筛选二级选择控件中的数据。

1. 在 Excel 中，选择二级选择控件的单元格。
2. 右键点击该单元格，选择 "属性" > "下拉列表"。
3. 单击 "数据源" > "从另一个范围中获取值"。
4.选择一级选择控件所在的区域（例如 A1:A10）。
5. 单击 "确定"。

**步骤4：测试二级联动**

最后，我们需要测试一下二级联动功能是否正常工作。

1. 在 Excel 中，选择一级选择控件。
2. 点击下拉列表按钮，选择一个产品类别（例如 "A"）。
3. 观察二级选择控件中的数据是否被筛选出来。

**代码示例**

以下是使用 VBA语言来实现二级联动功能的代码示例：

vbSub CreateSecondaryDropdown()
 ' 创建一级选择控件 Dim oRange As Range Set oRange = ThisWorkbook.Sheets("Sheet1").Range("A1:A10")
 ' 创建二级选择控件 Dim oRange2 As Range Set oRange2 = ThisWorkbook.Sheets("Sheet1").Range("B1:B100")
 ' 配置二级联动功能 With oRange2.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
 xlAnd, Formula1:="=INDIRECT("'" & Range("A1").Value & "'!A:A)"
 End WithEnd Sub

vb' 创建一级选择控件Dim oRange As RangeSet oRange = ThisWorkbook.Sheets("Sheet1").Range("A1:A10")

' 创建二级选择控件Dim oRange2 As RangeSet oRange2 = ThisWorkbook.Sheets("Sheet1").Range("B1:B100")

' 配置二级联动功能With oRange2.Validation ' 删除原有的验证规则 .Delete ' 添加新验证规则 .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
 xlAnd, Formula1:="=INDIRECT("'" & Range("A1").Value & "'!A:A)"
End With