统计两码出现个数并标红，谢谢大神们！

桑榆非晚 · 发表于 2024-7-21 12:02

如图，谢谢各位大神们！

如果条件格式不好解决，最起码解决第一个任务，谢谢啦！祝各位好心人心想事成，万事圆满！

edwin11891 · 发表于 2024-7-21 12:24

本帖最后由 edwin11891 于 2024-7-21 12:27 编辑

拉个火车：

=BYROW(A2:D12,LAMBDA(y,LET(t,TEXTSPLIT(TEXTJOIN(" ",,DROP(y,,1)),," ",1),s,MAP(t,LAMBDA(x,IF(SUM(N(ISNUMBER(FIND(REGEXP(x,"."),INDEX(y,,1)))))=2,1,0))),SUM(s))))

复制代码

edwin11891 · 发表于 2024-7-21 12:35

列举出匹配的二码（函数无法标红，可以考虑VBA完成）：

=BYROW(A2:D12,LAMBDA(y,LET(t,TEXTSPLIT(TEXTJOIN(" ",,DROP(y,,1)),," ",1),s,REDUCE("",t,LAMBDA(z,x,VSTACK(z,IF(SUM(N(ISNUMBER(FIND(REGEXP(x,"."),INDEX(y,,1)))))=2,x,"")))),TEXTJOIN(",",1,s))))

复制代码

edwin11891 · 发表于 2024-7-21 12:40

说明，看题主是M365，由于WPS正则函数的不同，上述公式里面的REGEXP（x，"."）需要替换为M365的相应形式：REGEXEXTRACT(x,".",1)。

E学子 · 发表于 2024-7-21 12:51

=LET(x,MID(A2,{1,2,3},1),y,UNIQUE(INDEX(TOCOL(x&TOCOL(x)),{2;3;4;6;7;8})),SUM(--ISNUMBER(FIND(y,B2:D2))))

复制代码

E学子 · 发表于 2024-7-21 13:00

=LET(x,MID(A2,{1,2,3},1),y,UNIQUE(INDEX(TOCOL(x&TOCOL(x)),{2;3;4;6;7;8})),TEXTJOIN(";",,IFERROR(MID(B2:D2,FIND(y,B2:D2),2),"")))

复制代码

条件格式做不到部分字体标红，公式可以提取出来

桑榆非晚 · 发表于 2024-7-21 13:09

本帖最后由桑榆非晚于 2024-7-21 13:12 编辑

edwin11891 发表于 2024-7-21 12:40
说明，看题主是M365，由于WPS正则函数的不同，上述公式里面的REGEXP（x，"."）需要替换为M365的相应形式：R ...

谢谢大神，可是我的365版本，还是计算不出来啊，显示计算步骤时，好像BYROW函数第一步就计算不出来了，这个应该怎样修改啊，谢谢大神！

桑榆非晚 · 发表于 2024-7-21 13:10

本帖最后由桑榆非晚于 2024-7-21 13:14 编辑

E学子发表于 2024-7-21 13:00
条件格式做不到部分字体标红，公式可以提取出来

大神啊，我的是365版本，计算不出来啊，怎样修改成365版本啊，谢谢您！

edwin11891 · 发表于 2024-7-21 16:30

桑榆非晚发表于 2024-7-21 13:09
谢谢大神，可是我的365版本，还是计算不出来啊，显示计算步骤时，好像BYROW函数第一步就计算不出来 ...

看错误类型是缺函数，按说M365不至于，可能是需要更新。分步试试公式里面的函数都有没有。

		自动登录	找回密码
密码			免费注册

[求助] 统计两码出现个数并标红，谢谢大神们！