两个单元所含数字不同的提取（补：重复数字个数）来源：excel格子社区当A1=267809135，B1=267813549时，那么C1=04
插入如下模块：Function不重复(rgAsRange)DimdicAsObjectDimrngAsRan
geDimstrAsStringDimiAsLongDimLAsLongDimtempSetdic
=CreateObject("Scripting.Dictionary")ForEachrngInrg?str=
rng.Value?L=Len(str)?Fori=1ToL?str1=Mid(str,i,1)?Ifdi
c.exists(str1)Thendic(str1)=dic(str1)+1?Elsedic.Addstr1,
1?EndIf?NextNexttemp=dic.itemstemp1=dic.keysFori=0To
UBound(temp)?Iftemp(i)=1Then?不重复=不重复&temp1(i)?EndIfNex
tEndFunction然后：c1=不重复（a1:b1)即可！补：重复数字个数公式：{=SUM(ISNUMBER(FIND(RO
W(1:10)-1,A1))ISNUMBER(FIND(ROW(1:10)-1,B1)))} |
|
