vlookup函数两张表匹配(EXCEL表中如何利用VLOOKUP将

方法一：公式法。假设我们在sheet1的A列有一系列数据，需要在sheet2的B列中查找是否存在于A列的数据。这时，我们可以在sheet2的C列使用VLOOKUP函数来实现这一操作。具体的公式为：=VLOOKUP(B1, sheet1!A:A, 1, 0)。当我们在sheet1的A列中找到了与sheet2的B列相匹配的数据时，公式会返回相应的值；如果没有找到，公式会返回N/A，表示未匹配。

方法二：通过VBA代码查找并上色。这种方法更为灵活和强大，适用于更复杂的数据匹配和处理需求。以下是具体的代码示例：

```vba

Sub filterData()

Dim s1 As Variant

Dim i, j As Integer

Dim foundRange As Range

Application.ScreenUpdating = False '关闭屏幕更新以提高效率

'获取Sheet2中B列的数据

s1 = Sheet2.Range("B1:B180").Value

'遍历s1中的每一个数据，在Sheet1的B列中查找

For i = 1 To UBound(s1, 1)

Set foundRange = Sheet1.Range("B1:B20357").Find(What:=s1(i, 1), LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext)

'如果找到了匹配的数据，将整行背景色设置为红色

If Not foundRange Is Nothing Then

Sheet1.Cells(foundRange.Row, 2).EntireRow.Interior.Color = rgb(Red) '这里省略了具体的RGB值，假定rgbRed已被正确定义

Else

MsgBox "数据 " & s1(i, 1) & " 并未在Sheet1中找到", vbInformation '使用vbInformation图标显示信息框

End If

Next i

Application.ScreenUpdating = True '恢复屏幕更新

End Sub

```