Mac版Excel术语表关键词搜索返回匹配多行功能实现求助

方法一：筛选+辅助列（无编程需求） #

• 插入辅助列（如J列），在J2单元格输入公式：
  =ISNUMBER(SEARCH($K$1,A2&" "&B2&" "&C2&" "&D2&" "&E2&" "&F2&" "&G2&" "&H2&" "&I2))
  该公式会检查当前行A-I列是否包含K1单元格的关键词，返回TRUE（匹配）或FALSE（不匹配）。
• 在K1单元格输入搜索关键词。
• 选中整个数据区域（含辅助列），点击「数据」选项卡的「筛选」，在辅助列的筛选菜单中仅勾选「TRUE」，即可只显示匹配行。

方法二：动态数组函数（适用于Mac Excel 365/2021及以上） #

若你的Excel版本支持动态数组，可直接用FILTER函数一键生成结果：

• 在空白区域（如K2单元格）输入公式：
  =FILTER(A2:I16300,MMULT(--(ISNUMBER(SEARCH(K1,A2:I16300))),SEQUENCE(COLUMNS(A2:I16300),,1,0))>0,"无匹配结果")
  公式会自动筛选出所有包含K1关键词的行，结果随关键词实时更新。

方法三：VBA自定义搜索按钮（解决控件缺失问题） #

如果需要更贴近词典的交互体验，可通过VBA实现：

1. 点击「开发工具」选项卡的「Visual Basic」（若未显示开发工具，前往「偏好设置」-「视图」勾选显示）。
2. 在左侧工程窗口右键插入模块，粘贴以下代码：

Sub KeywordSearch()
    Dim searchKey As String
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim i As Long
    
    Set ws = ActiveSheet
    searchKey = InputBox("请输入搜索关键词：")
    If searchKey = "" Then Exit Sub
    
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    
    ' 取消之前的筛选状态
    If ws.AutoFilterMode Then ws.AutoFilterMode = False
    
    ' 遍历行，隐藏不匹配内容
    For i = 2 To lastRow
        If InStr(1, ws.Cells(i, "A") & " " & ws.Cells(i, "B") & " " & ws.Cells(i, "C") & " " & ws.Cells(i, "D") & " " & ws.Cells(i, "E") & " " & ws.Cells(i, "F") & " " & ws.Cells(i, "G") & " " & ws.Cells(i, "H") & " " & ws.Cells(i, "I"), searchKey, vbTextCompare) = 0 Then
            ws.Rows(i).Hidden = True
        Else
            ws.Rows(i).Hidden = False
        End If
    Next i
End Sub

3. 返回Excel界面，在「开发工具」-「控件」中选择「按钮（表单控件）」，绘制按钮后关联上述KeywordSearch宏。
4. 点击按钮即可弹出输入框，输入关键词后自动隐藏不匹配行；输入空关键词可恢复显示所有行。

内容的提问来源于stack exchange，提问作者iviennes