怎么提取两个excel相同的数据

使用Excel提取两个表格中的相同数据，可以使用查找与引用公式、条件格式、或Power Query等方法。 其中，VLOOKUP、INDEX和MATCH、以及条件格式是最常用的方法。以下将详细介绍其中的VLOOKUP方法。

一、VLOOKUP函数

VLOOKUP函数是Excel中非常强大的工具，用于在一个表格中查找某个值，并返回该值所在行中的另一个单元格的值。使用VLOOKUP提取两个Excel表格中的相同数据时，可以遵循以下步骤：

准备数据：确保两个Excel表格中包含你想要比较的数据列。假设你有两个工作表Sheet1和Sheet2，它们都有一个名为“Product ID”的列。
应用VLOOKUP：在Sheet1中添加一个新的列，用于存储匹配结果。假设你在A列中有“Product ID”，在B列中有“Product Name”，在C列中你要查找Sheet2中的匹配数据。你可以在C2单元格中输入以下公式：
```
=IF(ISNA(VLOOKUP(A2, Sheet2!A:B, 2, FALSE)), "No Match", VLOOKUP(A2, Sheet2!A:B, 2, FALSE))
```
在这个公式中，VLOOKUP函数查找Sheet2中A列中与Sheet1中A2单元格匹配的值，并返回B列中的对应值。如果没有匹配值，ISNA函数会返回“No Match”。

二、INDEX和MATCH函数

INDEX和MATCH函数组合使用比VLOOKUP更加灵活，特别是在处理多列数据时。以下是使用INDEX和MATCH提取相同数据的方法：

准备数据：同样，你需要确保两个表格中包含你要比较的数据列。
应用INDEX和MATCH：在Sheet1中添加一个新的列，假设你在A列中有“Product ID”，在B列中有“Product Name”，在C列中你要查找Sheet2中的匹配数据。你可以在C2单元格中输入以下公式：
```
=IF(ISNA(INDEX(Sheet2!B:B, MATCH(A2, Sheet2!A:A, 0))), "No Match", INDEX(Sheet2!B:B, MATCH(A2, Sheet2!A:A, 0)))
```
在这个公式中，MATCH函数查找Sheet2中A列中与Sheet1中A2单元格匹配的值，并返回其行号，INDEX函数返回该行中的B列的值。如果没有匹配值，ISNA函数会返回“No Match”。

三、条件格式

条件格式可以用来高亮显示两个表格中相同的数据，方便用户进行对比和分析。以下是具体步骤：

准备数据：确保两个表格中包含你要比较的数据列。
应用条件格式：选择Sheet1中的数据列，然后点击“开始”菜单中的“条件格式”，选择“新建规则”，然后选择“使用公式确定要设置格式的单元格”。在公式框中输入以下公式：
```
=ISNUMBER(MATCH(A2, Sheet2!A:A, 0))
```
设置格式为你想要的颜色，这样Sheet1中与Sheet2匹配的值将会被高亮显示。

四、Power Query

Power Query是Excel中的一个强大工具，特别适用于处理大数据集和复杂的数据操作。使用Power Query提取两个表格中的相同数据步骤如下：

准备数据：确保两个Excel表格中包含你要比较的数据列。
加载数据到Power Query：在Excel中，选择“数据”菜单，点击“从表/范围”，然后选择你要加载的第一个表格。重复此步骤加载第二个表格。
合并查询：在Power Query编辑器中，选择“合并查询”，选择你要合并的两个表格，并选择匹配的列（例如“Product ID”）。
筛选结果：在合并结果中，你可以筛选出匹配的记录，然后将结果加载回Excel。

五、使用VBA宏

如果你需要经常进行数据匹配操作，可以考虑使用Excel VBA宏来自动化这个过程。以下是一个简单的VBA宏示例，用于查找两个表格中的相同数据：

打开VBA编辑器：在Excel中，按Alt + F11打开VBA编辑器。
插入模块：在VBA编辑器中，点击“插入”，然后选择“模块”。

输入代码：在模块中输入以下代码：

Sub FindMatches()
    Dim ws1 As Worksheet, ws2 As Worksheet
    Dim lastRow1 As Long, lastRow2 As Long
    Dim i As Long, j As Long
    Set ws1 = ThisWorkbook.Sheets("Sheet1")
    Set ws2 = ThisWorkbook.Sheets("Sheet2")
    lastRow1 = ws1.Cells(ws1.Rows.Count, "A").End(xlUp).Row
    lastRow2 = ws2.Cells(ws2.Rows.Count, "A").End(xlUp).Row
    For i = 2 To lastRow1
        For j = 2 To lastRow2
            If ws1.Cells(i, 1).Value = ws2.Cells(j, 1).Value Then
                ws1.Cells(i, 3).Value = ws2.Cells(j, 2).Value
                Exit For
            End If
        Next j
    Next i
End Sub

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

六、总结

通过以上方法，你可以在Excel中轻松提取两个表格中的相同数据。每种方法都有其独特的优势和适用场景，例如VLOOKUP适用于简单的匹配任务，而Power Query和VBA宏更适合复杂的数据操作和自动化需求。选择最适合你的方法，可以显著提高你的工作效率和数据处理能力。