按矩阵对角线方向排序数据

shaowu459

如下图所示，要求将A1:J10单元格区域的数字按从左上到右下的每条对角线方向升序排列数据，结果返回在右侧绿色单元格区域。
源数据随机数范围为1~9，区域固定10行10列。
附件后面有目前的一些参考公式，欢迎讨论。

bjzzxhzl

刚好群里做了发了图没有发公式，那就干脆贴在这里吧：


365：

1. =LET(s,ROW(1:10),MAKEARRAY(10,10,LAMBDA(x,y,SMALL(INDEX(A1:J10,DROP(s,x-y),DROP(s,y-x)),MIN(x,y)))))

复制代码

PQ:

1. = let s=Table.ToRows(源) in  #table(null,List.Split(List.TransformMany({0..9},each {0..9},(x,y)=>List.Sort(List.Transform({List.Max({x-y,0})..List.Min({9,9+x-y})},each s{_}{_+y-x})){List.Min({x,y})}),10))

复制代码

大团结

挺简单的题目
=SMALL(IFERROR(1/N(OFFSET(A1,10-ROW($1:$19),10-ROW($1:$19)))^-1,""),IF(ROW()<=COLUMN()-24,ROW(),COLUMN()-24))
右拉下拉

cnmlgb9998

都是神人。。。。。。。。。。。。。。

我走我流

=SMALL(IF(COLUMN($A:$J)-COLUMN(A1)=ROW($1:$10)-ROW(A1),$A$1:$J$10),MIN(COLUMN(A1),ROW(A1)))

shaowu459

截至目前，不管是溢出结果还是单元格拖拉结果，大体思路差不多，看看是否还有其他思路，不管公式长短。365函数的优点是可以不依赖单元格区域，源数据是内存数组，也可以完成排序。

我之前还有一个思路，循环两次，公式比较长。第一次循环将第一列后面的每一列提升1行和左侧拼接，最后每一个对角线数据就在一行上，然后每行排序。上方拼接的差额是用0填充，下方是堆积产生的错误值，每行升序排列，不影响数据位置。按行排序完成后，再使用TOCOL函数去掉0和错误值，最后按一列10个元素折叠。

micch

1. =SMALL(IF(COLUMN()-ROW()=COLUMN($L:$U)-ROW($1:$10),$A$1:$J$10),MIN(COLUMN(A:A),ROW()))

复制代码

新函数不会搞

象山海鲜

shaowu459 发表于 2024-4-30 10:00
截至目前，不管是溢出结果还是单元格拖拉结果，大体思路差不多，看看是否还有其他思路，不管公式长短。365 ...

排序法

1. =LET(a,SEQUENCE(100)+9,b,INT(a/10)*11-a,c,TOCOL(A1:J10),WRAPROWS(SORTBY(SORTBY(c,b+c%),SORTBY(a,b)),10))

复制代码

象山海鲜

1. =LET(a,SEQUENCE(10)+10,b,a-SEQUENCE(,10),REDUCE(A1:J10,SEQUENCE(19),LAMBDA(x,y,LET(d,-1^(y>10),IF(y=b,d*TAKE(SORT(TOCOL(d*x/(y=b)),,d),d*10),x)))))

复制代码

shaowu459

象山海鲜 发表于 2024-5-4 15:21

劳动节还不休息