比较典型的有条件连续问题，求公式

mykitami

cnmlgb9998 发表于 2025-3-11 12:17
用递归解决。

递归高手，向你学习！
这使我重新燃起了对递归的兴趣，当时觉得自己的使用递归场景很少很少，所以一直没有当回事。
后来发现，很多常规方法难以解决的问题，用递归可以轻易解决。
以后，请多多指教！多谢！

edwin11891

其他思路都跟前面各位老师的大同小异，只对第二问的后一问题抛块砖吧，方法不限于数据是几位数。

1. =LET(t,TEXTSPLIT(REPT(",",A2<3)&CONCAT(A2:AE2&","),,","&SEQUENCE(3,,0)&","),s,FILTER(t,LEN(t)-LEN(SUBSTITUTE(t,",",""))>=2),TEXTJOIN(CHAR(10),,s))

复制代码

edwin11891

第二问合并起来：

1. =LET(t,TEXTSPLIT(REPT(",",A2<3)&CONCAT(A2:AE2&","),,","&SEQUENCE(3,,0)&","),s,FILTER(t,LEN(t)-LEN(SUBSTITUTE(t,",",""))>=2),HSTACK(ROWS(s),TEXTJOIN(CHAR(10),,s)))

复制代码

eni4

PQ版本友好，Excel2016以上即可。

仗剑天涯0o0

1. =LET(a,TEXTSPLIT(CONCAT(IF(A2:AE2>=3,A2:AE2,0)),"0"),c,FILTER(a,LEN(a)>2),TEXTJOIN(CHAR(10),,MAP(c,LAMBDA(x,TEXTJOIN(",",1,MID(x,SEQUENCE(LEN(x)),1))))))

复制代码

最后一问

mengrs

笨法第二问(数字可以是一位数多位数)
=LET(a,CHAR(SEQUENCE(COUNT(SORT(UNIQUE(TOCOL(IF(A2:AE2<3,x,A2:AE2),3)))),,65)),b,SORT(UNIQUE(TOCOL(IF(A2:AE2<3,x,A2:AE2),3))),TEXTJOIN(CHAR(10),,SUBSTITUTES(REGEXP(REGEXP(CONCAT(TOCOL(IFERROR(LOOKUP(A2:AE2,b,a),0),3)),"\D{3,}"),"(?<!^)(?!$)",2,","),a,b)))

无关岁月

参与一下，第二问

1. =TEXTJOIN(CHAR(10),,REGEXEXTRACT(CONCAT(IF(A2:AE2>2,","&A2:AE2)),"(\d,?){3,}",1))

复制代码

一杯绿茶来了

cnmlgb9998 发表于 2025-3-11 12:17
用递归解决。

果然是递归神，什么都用递归！

mykitami

edwin11891 发表于 2025-3-11 16:55
其他思路都跟前面各位老师的大同小异，只对第二问的后一问题抛块砖吧，方法不限于数据是几位数。

套入公式以后，发现结果不正确。（我用的是M365，有可能WPS下运行是正确的，这种事常发生的，我以前遇到过）
分析老师的公式后，明白了老师的思路，确实是一种我以前从来没有考虑过的思路，很有创意，竟然还可以这样啊，真是受益颇深，在尝试修改公式的过程中，发现用textsplit进行拆分字符串时，如果分割符是两个或两个以上的字符时，结果跟预想的不一样，这纠正了我以前认识上的一个误区。
下面按你的思路最终改完的公式：
=LET(t,TEXTSPLIT(TEXTJOIN(",",,(IF(A2:AE2>=3,A2:AE2,"@")))&",",,"@,",1),s,FILTER(t,LEN(t)-LEN(SUBSTITUTE(t,",",""))>2),TEXTJOIN(CHAR(10),,TEXTBEFORE(s,",",-1)))

如果老师有时间，看看能不能再优化一下。