如何判斷Excel中兩個字符串的區別？

Question

我創建了一個評估，申請人填寫Excel。我有一把鑰匙，我在那裏複製他們的答案，並告訴我他們的答案是否與我的鑰匙匹配。 我想添加一個公式，該公式還會顯示申請人的單元格（B2）和密鑰單元格（A2）之間的差異，以便更容易地查看他們出錯的地方。

我試過使用=SUBSTITUTE(B2,A2,"")但這隻會給我在字符串的開頭或結尾的差異。通常，差異在中間。

例如，我的密鑰（單元格A2）可能會說：Cold War |豬灣|菲德爾卡斯特羅

而申請人（單元格B2）可能會說：冷戰|古巴導彈危機|菲德爾·卡斯特羅

我想這個公式返回：「古巴導彈危機」

Answer 1

你可以試試這樣的事情...

Function CompareStrings(keyRng As Range, ansRng As Range) As String 
Dim arr() As String 
Dim i As Long 
arr() = Split(ansRng.Value, "|") 
For i = 0 To UBound(arr) 
    If InStr(keyRng.Value, arr(i)) = 0 Then 
     CompareStrings = arr(i) 
     Exit Function 
    End If 
Next i 
End Function 

然後你可以使用這個UDF像下面...

=CompareStrings(A2,B2) 

如果你想將它們以相反的順序也比較，並從其中任何回報不匹配的字符串的一部分，試試這個...

Function CompareStrings(ByVal keyRng As Range, ByVal ansRng As Range) As String 
Dim arr() As String 
Dim i As Long 
Dim found As Boolean 
arr() = Split(ansRng.Value, "|") 
For i = 0 To UBound(arr) 
    If InStr(keyRng.Value, Trim(arr(i))) = 0 Then 
     found = True 
     CompareStrings = arr(i) 
     Exit Function 
    End If 
Next i 

If Not found Then 
    arr() = Split(keyRng.Value, "|") 
    For i = 0 To UBound(arr) 
     If InStr(ansRng.Value, Trim(arr(i))) = 0 Then 
      CompareStrings = arr(i) 
      Exit Function 
     End If 
    Next i 
End If 
End Function 

使用此像以前一樣下面...

=CompareStrings(A2,B2) 

所以功能將首先B2的所有字符串部分比較A2，如果發現任何不匹配，它將返回字符串的一部分和如果它沒有發現任何不匹配，它將比較A2中字符串的所有部分與B2，並返回字符串的任何不匹配部分。所以它會比較兩種方式。