|
可以用自定义函数（vba） 按alt+f11 右键新建一个模块 粘贴以下代码 Function 查找相同(rg1 As Range, rg2 As Range) For i = 1 To Len(rg1.Value) If InStr(rg2, Mid(rg1.Value, i, 1)) > 0 Then a = a & Mid(rg1, i, 1) End If Next 查找相同 = a End Function 再回到excel界面，写公式=查找相同(A1,B1) 即可查出结果 而判断是否一致，则需要 =IF(OR(ISERROR(FIND(A1,B1,1)),ISERROR(FIND(B1,A1,1))),'一样','不一样') 或者 =IF(OR(ISNUMBER(FIND(A1,B1,1)),ISNUMBER(FIND(B1,A1,1))),'一样','不一样') 两个都可以 FIND(A1,B1,1)左边是否包含右边 FIND(B1,A1,1)右边是否左边 ISNUMBER(FIND(A1,B1,1) 如果是数字说明可以找的到就是说包含 不管是哪边包含哪边只要有一个符合条件就说明一样所以用一个or 最后用一个if就可以了 |
|
|
