(资料图片仅供参考)

今天来聊聊关于excel表数据匹配填充，excel两表数据匹配的文章，现在就为大家来简单介绍下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)，然后复制粘贴即可。

相信通过excel两表数据匹配这篇文章能帮到你，在和好朋友分享的时候，也欢迎感兴趣小伙伴们一起来探讨。

关键词：