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

时间:2016-02-15 03:54:53

标签: excel vba excel-vba

我有两张纸,(Sheet2)& (表Sheet 3)。我想匹配表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

1 个答案:

答案 0 :(得分:1)

您可以使用简单的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,然后将代码修改为您自己的代码。