2012-11-01 85 views
1

任何人都可以用excel公式帮助我,看看具有一串文本的一个单元格是否与具有相同字符串文本但位置不同的其他单元格相同。比较具有相同单词变体的两个单元格

请参阅下面的例子:

细胞A1:apple orange grape

细胞A2:orange grape apple

我需要一个公式,以检查是否A1是相同的或不A2

感谢

+1

将用户定义的函数/式办?需要拆分功能,但仅在VBA中可用。 –

+1

它们总是被空格分隔吗?你可以重新排列字母还是只字? '苹果橙'匹配'橙色plpea'? – nutsch

+0

@nutsch只是词的安排。谢谢。 – aji

回答

3

把附加的代码放在一个模块中,并从你的工作中调用它ksheet作为函数,例如
=sCompare(A1,A2)

CODE

Public Function sCompare(s1 As String, s2 As String) As Boolean 
Dim vArr1, vArr2, lLoop As Long, lLoop2 As Long, bMatch As Boolean 

vArr1 = Split(trim(s1), " ") 
vArr2 = Split(trim(s2), " ") 

If UBound(vArr1) <> UBound(vArr2) Then Exit Function 

For lLoop = 0 To UBound(vArr1) 
    bMatch = False 
    For lLoop2 = 0 To UBound(vArr2) 
     If vArr1(lLoop) = vArr2(lLoop2) Then 
      bMatch = True 
      Exit For 
     End If 
    Next lLoop2 

    If bMatch = False Then Exit Function 
Next lLoop 

sCompare = True 
End Function 
相关问题