2个单元格相等数据的判断

xtmyd5156

无关岁月

1. =IF(AND(REGEXP(B2,REGEXP(A2,"[^,]+"),1)),"相等","不相等")

复制代码

hcm19522

{=REPT("不",1-(COUNT(FIND(TRIM(MID(SUBSTITUTE(A2,",",REPT(" ",99)),ROW($1:$9)*99-98,99)),B2))=9))&"相等"

lyj344600

=LET(q,TEXTSPLIT(A2,",",,1)=TEXTSPLIT(B2,,","),w,IF(AND(SUM(--q)=ROWS(q),ROWS(q)=COLUMNS(q)),"相等","不相等"),w)

zhangcheng6688

借楼学习一下正则表达式
Sub test()
arr = [a1].CurrentRegion
Set reg = CreateObject("vbscript.regexp")
reg.Pattern = "[^,]+"
reg.Global = True
For i = 2 To UBound(arr)
   If reg.test(arr(i, 1)) Then
      Set mh = reg.Execute(arr(i, 1))
      For Each mho In mh
         If InStr(arr(i, 2), mho) = 0 Then
            arr(i, 3) = "不相等"
            GoTo x
         End If
      Next
      arr(i, 3) = "相等"
   End If
x:
Next
[a1].CurrentRegion = arr
End Sub