1
任何人都可以用excel公式帮助我,看看具有一串文本的一个单元格是否与具有相同字符串文本但位置不同的其他单元格相同。比较具有相同单词变体的两个单元格
请参阅下面的例子:
细胞A1:apple orange grape
细胞A2:orange grape apple
我需要一个公式,以检查是否A1
是相同的或不A2
感谢
任何人都可以用excel公式帮助我,看看具有一串文本的一个单元格是否与具有相同字符串文本但位置不同的其他单元格相同。比较具有相同单词变体的两个单元格
请参阅下面的例子:
细胞A1:apple orange grape
细胞A2:orange grape apple
我需要一个公式,以检查是否A1
是相同的或不A2
感谢
把附加的代码放在一个模块中,并从你的工作中调用它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
将用户定义的函数/式办?需要拆分功能,但仅在VBA中可用。 –
它们总是被空格分隔吗?你可以重新排列字母还是只字? '苹果橙'匹配'橙色plpea'? – nutsch
@nutsch只是词的安排。谢谢。 – aji