比较两个单元格相同的单词变体

任何人都可以帮助我一个Excel公式，以查看一个文本string是否与其他单元格相同的string相同的文本，但在不同的位置/位置相同。

请看下面的例子：

细胞A1： apple orange grape

细胞A2： orange grape apple

我需要一个公式来检查A1是否与A2相同

谢谢

Answer 1

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

码

 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