|
可以用自定義函數(shù)（vba） 按alt+f11 右鍵新建一個(gè)模塊 粘貼以下代碼 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界面，寫(xiě)公式=查找相同(A1,B1) 即可查出結(jié)果 而判斷是否一致，則需要 =IF(OR(ISERROR(FIND(A1,B1,1)),ISERROR(FIND(B1,A1,1))),'一樣','不一樣') 或者 =IF(OR(ISNUMBER(FIND(A1,B1,1)),ISNUMBER(FIND(B1,A1,1))),'一樣','不一樣') 兩個(gè)都可以 FIND(A1,B1,1)左邊是否包含右邊 FIND(B1,A1,1)右邊是否左邊 ISNUMBER(FIND(A1,B1,1) 如果是數(shù)字說(shuō)明可以找的到就是說(shuō)包含 不管是哪邊包含哪邊只要有一個(gè)符合條件就說(shuō)明一樣所以用一個(gè)or 最后用一個(gè)if就可以了 |
|
|
