excel怎么查找关键词提取出来

在Excel中查找并提取关键词的方法有多种：使用查找功能、使用公式（如FIND和SEARCH函数）、使用VBA代码、使用Power Query等。下面将详细介绍使用公式和VBA代码的方法。

一、使用公式

1、FIND和SEARCH函数

FIND和SEARCH函数都是用于在文本中查找指定字符串，并返回字符串首次出现的位置的函数。两者的主要区别是FIND函数区分大小写，而SEARCH函数不区分大小写。

示例：

假设我们有一列文本数据在A列，要查找关键词“excel”并提取出来。

在B1单元格输入公式：=IF(ISNUMBER(FIND("excel",A1)),"excel","")
复制公式到B列的其他单元格。

这样，如果A列中的文本包含“excel”，B列将显示“excel”，否则为空。

2、使用IF、ISNUMBER、SEARCH组合公式

如果要查找多个关键词，可以组合使用IF、ISNUMBER和SEARCH函数。

示例：

假设我们要在A列的文本中查找多个关键词“excel”、“keyword”和“find”，并将找到的关键词提取出来。

在B1单元格输入公式：=IF(ISNUMBER(SEARCH("excel",A1)),"excel",IF(ISNUMBER(SEARCH("keyword",A1)),"keyword",IF(ISNUMBER(SEARCH("find",A1)),"find","")))
复制公式到B列的其他单元格。

这样，如果A列中的文本包含任何一个关键词，B列将显示相应的关键词，否则为空。

二、使用VBA代码

对于复杂的关键词查找和提取任务，VBA代码是一种非常有效的方法。下面是一个示例代码，查找A列中的关键词并将其提取到B列。

1、打开VBA编辑器

按Alt + F11打开VBA编辑器。

2、插入模块

点击“插入” > “模块”插入一个新模块。

3、输入VBA代码

在模块中输入以下代码：

Sub ExtractKeywords()
    Dim ws As Worksheet
    Dim cell As Range
    Dim keywords As Variant
    Dim i As Long
    ' 定义要查找的关键词
    keywords = Array("excel", "keyword", "find")
    ' 设置工作表
    Set ws = ThisWorkbook.Sheets("Sheet1")
    ' 遍历A列的每个单元格
    For Each cell In ws.Range("A1:A" & ws.Cells(ws.Rows.Count, "A").End(xlUp).Row)
        ' 遍历关键词数组
        For i = LBound(keywords) To UBound(keywords)
            If InStr(1, cell.Value, keywords(i), vbTextCompare) > 0 Then
                cell.Offset(0, 1).Value = keywords(i)
                Exit For
            End If
        Next i
    Next cell
End Sub

4、运行VBA代码

关闭VBA编辑器，返回Excel，按Alt + F8打开宏对话框，选择ExtractKeywords，然后点击“运行”。

该代码将遍历A列的每个单元格，并在每个单元格中查找关键词数组中的关键词。如果找到匹配的关键词，将其提取到相应的B列单元格。

三、使用Power Query

Power Query是Excel中的一个强大数据处理工具，它可以用于从多个数据源导入、转换和加载数据。可以使用Power Query来查找并提取关键词。

1、加载数据到Power Query

选择A列中的数据。
点击“数据”选项卡。
选择“从表/范围”。

2、编辑查询

在Power Query编辑器中，选择“添加列”选项卡。
选择“自定义列”。
输入新的列名称，例如“Keywords”。
在公式框中输入以下公式：

let
    Source = [Column1],
    Keywords = {"excel", "keyword", "find"},
    ExtractedKeywords = Text.Combine(List.Select(Keywords, each Text.Contains(Source, _)), ", ")
in
    ExtractedKeywords

3、加载结果到工作表

点击“关闭并加载”。
结果将加载到新的工作表。

通过上述方法，可以在Excel中有效地查找并提取关键词。这些方法各有优缺点，可以根据具体需求选择适合的方法。使用公式适合简单的查找任务，而VBA代码和Power Query更适合复杂的任务。掌握这些技术，可以大大提高数据处理的效率和准确性。