在另一个工作表的列中查找匹配的数据

我有两张纸,即(Sheet2)和(Sheet3)。 我希望匹配第3页第A列中的A列数据。下面的示例:

Sheet2 Sheet3 StdID StdID 1001 1001 1002 1002 1003 1002 1004 1004 1005 1005 1006 1006 

我想要的输出是这样的..(已经有一个Sheet4,但它是空白的,所以不需要添加一个新的工作表的VBA代码。)

 Sheet2 Sheet3 Sheet4 StdID StdID Result 1001 1001 Yes 1002 1002 Yes 1003 1002 No 1004 1004 Yes 1005 1005 Yes 1006 1006 Yes 

你可以通过使用简单的if()函数来做到这一点。 在Sheet4公式将是..

 =IF(Sheet2!A2=Sheet3!B2,"Yes","No") 

通过使用VBA:

 Public Sub dataMatch() Dim lnCell As Long lnCell = Sheets("Sheet2").Range("A2").End(xlDown).Row For i = 2 To lnCell If Sheets("Sheet3").Range("A" & i) = Sheets("Sheet2").Range("A" & i) Then Sheets("Sheet4").Range("A" & i) = "Yes" Else Sheets("Sheet4").Range("A" & i) = "No" End If Next End Sub 

假设你的数据从每个表格的A2单元格开始, A1单元格被用作标题。 结果将显示在Sheet4 A2单元格中。 如果你在另外一栏显示它的意思是BC那么修改你自己的代码。