然后用宏定义一个函数，从A列所有记录中找到第一个与B列当前行一级相似的数据，没找到的话再找二级、三级，都找不到显示无。追问
相似的数据怎么做定义？如果是公式，麻烦列个公式，然后简单说公式意思。
供参考
For i = 1 To Sheet5.UsedRange.Rows.Count 'B 栏数据
Bstr = Trim(Sheet5.Range("B" & i).Value)
num = Len(Bstr)
For j = 1 To Sheet5.UsedRange.Rows.Count 'A 栏数据
astr = Trim(Sheet5.Range("A" & j).Value)
If num = 1 Then
If InStr(astr, Bstr) >= 1 Then
m = m + 1
End If
ElseIf num > 1 Then
For k = 1 To num
aaa = Mid(Bstr, k, 1)
If InStr(astr, Mid(Bstr, k, 1)) >= 1 Then
m = m + 1
End If
Next k
End If
Dim rate As Double
rate = m / num
If rate >= 0.5 Then
Sheet5.Range("C" & i).Value = Bstr
End If
Next j
Next i
图表已上，请帮看看
追答这两列数据，各自为政，哪里有相似？无法给公式
追问有的，只是不全是一模一样的，找出相似关键字也不行？
追答你给个示例，哪个与哪个相似啊，关键字是什么
怎样把excel中两列有部分相同的数据进行匹配?
1. 使用VLOOKUP函数进行匹配：VLOOKUP函数是Excel中非常实用的一个函数，可以用来查找并返回某个值。具体操作时，你可以在第二列中设置一个公式，通过VLOOKUP函数查找第一列中的对应数据。如果两列数据有部分相同，VLOOKUP可以根据相同的部分找到对应的数据。例如，假设第一列为“姓名”，第二列为“电话号码...
Excel中文本字段的近似匹配
要实现Excel中文本字段的近似匹配，首先你需要打开一个新的工作表（1）。在第一列输入简化的字符，而第二列则列出可能包含这些简化的数据条目，形成一个对照表。接着，将查找功能应用到你的数据中。在目标列中，从单元格A1开始输入LOOKUP函数，这里的A1代表第一行简化的字符，作为查找起点（3）。在查找...
Excel中文本字段的近似匹配
1、首先新建一张excel表。2、在里面输入两列数据，左边是简化的字符，查看右边有哪些包含左边字符的条目。3、接着在要显示的列中，输入lookup函数，第一个才能书输入 9^9。4、接着添加FIND第一个选择简化的字符第一行那个A1，就是要查找的列第一个。5、选择要被查找获得的数据区域，并且记得用$...
EXCEL 两列相似(文字)匹配引用
你得给相似做个定义，否则无法用公式表示。比如，B列的前4个字能在A列找到为一级相似，前3个为二级相似，前2个字为三级相似。当然你可以考虑用别的办法。然后用宏定义一个函数，从A列所有记录中找到第一个与B列当前行一级相似的数据，没找到的话再找二级、三级，都找不到显示无。
Excel怎么比较两列文本是否相同
另一种方法是利用VLOOKUP函数。在C1中输入=VLOOKUP(A1,B1,1,FALSE)。同样按回车后，如果A1的值在B1列中找不到对应项，VLOOKUP会返回#N\/A，表明两者不一致。如果数据匹配，C1将显示相同的值。同样，这个公式也可以复制到其他行进行批量比较。这两种方法都能有效地帮助你完成Excel中两列文本的对比检查，...
EXCEL 两列相似数据(文字)匹配对应问题
=RIGHT(A1,LEN(A1)-FIND("街道",A1)-1)向下填充就可以了
excel两相似的单元格内容匹配
=IF(COUNTIF($A$1:$A$5,"*"&B3&"*")+COUNTIF($B$1:$B$5,"*"&A3&"*")>=1,"有匹配","无匹配")下拉填充。两列要是相同，此式显示无匹配。
excel 模糊匹配,两列数据有相似的字段,需要将两列匹配起来!
1、首先用WPS打开目标表格，选中要统计的两列，点击：条件格式->突出显示单元格规则->重复值。2、点击确定即可看到所有重复项被被标记为选定的字体颜色和填充想要的颜色。3、此时还不能直接统计红色字体颜色的数据项数量，接下来需要将要统计的那一列粘贴到一个DOCX文档里面，保存。4、然后，新建一个...
请问excel中如何将两列中相似的文字也当做重复项标记出来呢?
（一）VBA程序代码如下：Sub ChangeColor()Dim i1, i2, i3, i4, i5 On Error Resume Next Set mysheet1 = ThisWorkbook.Worksheets("Sheet1")For i1 = 2 To 1000 If mysheet1.Cells(i1, 1) <> "" Then For i2 = 2 To 1000 If mysheet1.Cells(i1, 2) <> "" Then i3 = ...
Excel中如何找出两列都包含相同关键字或者相似内容的数据?
这种题没有标准是没法做的，至少要说两者相同的字数达到百分比多少（比如50%）以上就算匹配成功。这样的话我给出一个公式 C1 =IF(COUNT(MATCH(MID(INDIRECT("A$1:A$"&COUNTA(A:A)),TRANSPOSE(ROW(INDIRECT("A$1:A$"&COUNTA(A:A))),ROW(INDIRECT("A$1:A$"&COUNTA(A:A))),MID(B1,ROW...
