365新函数：BOM结构父级子级-使用双循环替代递归

咔咔乱坠

shaowu459 发表于 2023-8-30 08:43
下面是一个例子，来说明3楼说的那种比较麻烦的堆积方式。如下图，要根据A:C列的层级关系，来生成右侧绿色区 ...

跟着老大练习一下，和上一楼公式大同小异

1. =LET(J,C2:C46,K,B2:B46,f,LAMBDA(f,m,[n],IF(n=7,m,f(f,IFNA(DROP(REDUCE(0,SEQUENCE(ROWS(m)),LAMBDA(x,y,LET(a,INDEX(m,y),b,SORT(FILTER(K,TAKE(a,,-1)=IF(J>0,J),"")),VSTACK(x,HSTACK(a,b))))),1),""),n+1))),f(f,B4)&CHAR(10)&XLOOKUP(f(f,B4),K,A2:A46,""))

复制代码

咔咔乱坠

咔咔乱坠 发表于 2024-8-1 19:51
跟练，全链条

果然，链条就是要有链条才好看，弄个单元格居中和产生从属链条的自定义函数
要求版本：excel365
注意事项：两个参数：必选参数ref，需为单元格引用，数据源的上侧右侧不能有东西
                                                        可选参数center，1为居中，0为不居中，默认为0

1. =LAMBDA(ref,[center],LET(D,DROP,V,VSTACK,H,HSTACK,R,REDUCE,S,SEQUENCE,I,INDEX,O,LAMBDA(R,c,OFFSET(ref,R,c)),链,IFS(O(,1)="","",(O(-1,)<>ref)*(O(1,)<>ref),"─",O(-1,)<>ref,"┌",ref<>O(1,),"└",1,"│"),中,IF(center,D(R(0,S(COLUMNS(ref)),LAMBDA(J,K,H(J,LET(序1,SCAN(0,I(ref,,K),LAMBDA(x,y,x+(y<>OFFSET(y,-1,)))),XLOOKUP(D(R(0,UNIQUE(序1),LAMBDA(x,y,V(x,LET(序2,SUM(N(序1=y)),IF(S(序2)=--TEXT(序2/2,0),y))))),1),序1,I(ref,,K),""))))),,1),IF(IFNA(V(1,DROP(ref,1)<>DROP(ref,-1)),1),ref,"")),D(R(0,S(COLUMNS(链)),LAMBDA(x,y,H(x,I(中,,y),I(链,,y)))),,1)))(A2:D26,1)

复制代码

简化掉一百个字符

1. =LAMBDA(ref,[center],LET(o,LAMBDA(r,c,OFFSET(ref,r,c)),链,IFS((o(,1)="")*(COLUMNS(ref)>1),"",(o(-1,)<>ref)*(o(1,)<>ref),"-",o(-1,)<>ref,"┌",ref<>o(1,),"└",1,"│"),DROP(REDUCE(0,SEQUENCE(COLUMNS(ref)),LAMBDA(J,K,LET(a,INDEX(ref,,K),序,SCAN(0,a,LAMBDA(x,y,x+(y<>OFFSET(y,-1,)))),HSTACK(J,IF(DROP(REDUCE(0,FREQUENCY(序,UNIQUE(序)),LAMBDA(x,y,IF(y,VSTACK(x,SEQUENCE(y)=IF(center,ROUND(y/2,),1)),x))),1),a,""),INDEX(链,,K))))),,1)))(A2:D26,1)

复制代码

递归

我不太会说话，卧槽真他妈的牛逼

shaowu459

咔咔乱坠 发表于 2024-10-17 11:24
果然，链条就是要有链条才好看，弄个单元格居中和产生从属链条的自定义函数
要求版本：excel365
注意事 ...

就是把上级弄到靠近中间的位置，类似合并单元格那种效果？

咔咔乱坠

shaowu459 发表于 2024-10-17 22:27
就是把上级弄到靠近中间的位置，类似合并单元格那种效果？

对，就是类似合并单元格居中再加上谁属于谁的括号，组成链条，趣味函数，好玩弄的，超老大玩了吗

shaowu459

咔咔乱坠 发表于 2024-10-18 00:26
对，就是类似合并单元格居中再加上谁属于谁的括号，组成链条，趣味函数，好玩弄的，超老大玩了吗

之前写过第一步的，把一样的内容留一个放在中间，加上横线没写过，有空试试

shaowu459

咔咔乱坠 发表于 2024-10-17 11:24
果然，链条就是要有链条才好看，弄个单元格居中和产生从属链条的自定义函数
要求版本：excel365
注意事 ...

这个是用的哪个数据源，几楼的附件？看公式写的范围是A2:D26

咔咔乱坠

shaowu459 发表于 2024-10-18 09:06
这个是用的哪个数据源，几楼的附件？看公式写的范围是A2:D26

我小改了一下数据源，是这个

shaowu459

咔咔乱坠 发表于 2024-10-18 10:25
我小改了一下数据源，是这个

了解了，用展开后的去整理格式了，还利用了单元格属性。我还是从AB两列数据源开始吧，一个意思，应该不用利用单元格属性。

shaowu459

咔咔乱坠 发表于 2024-10-18 10:25
我小改了一下数据源，是这个

还是从AB两列数据源：

1. =LET(A,A2:A48,B,B2:B48,f,LAMBDA(f,arr,DROP(REDUCE(0,arr,LAMBDA(x,y,VSTACK(x,IF(OR(y=A),LET(s,f(f,FILTER(B,A=y)),r,ROWS(s),t,SEQUENCE(r),u,IF(r=1,"-",IF(t=1,"┌",IF(t=r,"└"," |"))),HSTACK(IF(t=ROUND(r/2,),y,""),u,s)),y)))),1)),IFNA(f(f,UNIQUE(A)),""))

复制代码