Excel制作可搜索下拉框教程

1、通过数据验证与OFFSET公式创建动态下拉列表，实现输入关键字自动筛选匹配项；2、在支持动态数组的版本中使用FILTER函数生成实时筛选结果作为下拉数据源；3、利用VBA宏监听单元格变化，实时更新匹配项并刷新下拉列表内容。

如果您希望在Excel中实现快速查找并选择目标数据，但面对大量选项时手动滚动查找效率低下，可以通过设置动态搜索下拉列表来提升操作效率。以下是实现该功能的具体步骤：

本文运行环境：Surface Laptop 5，Windows 11

一、使用数据验证与公式创建动态搜索框

通过结合数据验证、命名区域和公式，可以构建一个根据输入内容动态更新的下拉列表，使用户在输入关键字时自动筛选匹配项。

1、在工作表中准备完整的数据源列表，例如将所有可选项目列在“数据源”列（如E列）中。

2、在一个空白单元格（如A1）中输入搜索关键词，作为动态筛选的依据。

3、点击“公式”选项卡，选择“名称管理器”，新建一个名称，例如命名为“动态列表”。

4、在“引用位置”中输入以下数组公式：=OFFSET($E$1,0,0,COUNTIF($E:$E,"*"&$A$1&"*"),1)，用于动态计算符合条件的数据范围。

5、选中需要设置下拉框的单元格区域，点击“数据”选项卡中的“数据验证”。

6、在“允许”下拉菜单中选择“序列”，在“来源”框中输入：=动态列表，点击确定完成设置。

二、利用辅助列与FILTER函数实现动态筛选（适用于支持动态数组的版本）

在Excel 365或Excel 2021等支持动态数组函数的版本中，可直接使用FILTER函数生成实时筛选结果，并将其作为下拉列表的数据源。

1、在F列创建辅助列，输入以下公式：=FILTER(E:E,ISNUMBER(SEARCH(A1,E:E)))，该公式会返回所有包含A1中关键词的项目。

2、复制F列中生成的结果区域（不包括空值），去除重复项后整理为纯净列表。

3、再次打开“数据验证”对话框，在目标单元格区域中设置验证条件为“序列”。

4、在“来源”中选择F列中筛选出的有效结果区域，点击确定应用设置。

三、通过VBA宏实现实时搜索下拉功能

若需更高级的交互体验，例如在输入过程中实时刷新下拉选项，可借助VBA编写事件驱动代码来实现动态响应。

1、按下Alt + F11打开VBA编辑器，双击对应工作表名称进入代码窗口。

2、粘贴以下事件代码：

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Dim SearchTerm As String
SearchTerm = Target.Value
Dim SourceRange As Range, Cell As Range
Set SourceRange = Me.Range("E:E")
Dim Result As New Collection
On Error Resume Next
For Each Cell In SourceRange
If InStr(1, Cell.Value, SearchTerm, vbTextCompare) > 0 And Not IsEmpty(Cell.Value) Then
Result.Add Cell.Value
End If
Next Cell
Me.Range("F:F").ClearContents
Dim i As Integer
For i = 1 To Result.Count
Me.Cells(i, 6).Value = Result(i)
Next i
End If
End Sub

3、确保数据验证的来源指向F列输出的动态结果区域。

4、返回工作表，在A1单元格输入关键词，系统将自动在F列更新匹配项，并同步刷新下拉列表内容。