大家好,今天小六子来为大家解答以下的问题，关于excel表数据匹配查找，excel两表数据匹配这个很多人还不知道，现在让我们一起来看看吧！

1、设表2为sheet2，从第2行开始是数据，则1）插入模块。

2、做个自定义函数 function CString(strSN As String) As String Dim sht As Worksheet, R As Long, I As Long Set sht = Sheet2 With sht R = .Range("A" & Rows.Count).End(xlUp).Row For I = 2 To R If CStr(.Range("A" & I).Value) = strSN Then CString = CString & .Range("B" & I).Value & ";" Next End With Set sht = NothingEnd Function2）表1中，C2=CString(A2)，然后复制粘贴即可。

本文分享完毕，希望对你有所帮助。