Microsoft 365：X檔案大揭秘

shaowu459

cutecpu 发表于 2023-8-7 16:16
=REDUCE(+A2:B19,B2:B19,LAMBDA(x,y,VSTACK(DROP(x,1),HSTACK(@x,IF(y,y,MATCH(,FREQUENCY(-(x=@x)*DROP(x, ...

感谢跟帖支持
后部分处理也可以用UNIQUE函数：

1. =REDUCE(+A2:B19,B2:B19,LAMBDA(x,y,VSTACK(DROP(x,1),HSTACK(@x,IF(y,y,@UNIQUE(VSTACK(ROW(1:19),TOCOL(x/(TAKE(x,,1)=@x))),,1))))))

复制代码

但就这个问题来说，不使用REDUCE函数的这种方法，群里还有一些比较短的公式（核心用UNIQUE+VSTACK组合，MAP一下自动溢出或下拉均可），因为跟这个帖的主题关系不大，就不一一列示了。

shaowu459

每次循环后的值堆叠在x左侧，下次循环引用第一列内容运算，保留每次运算的结果。


题目描述：10个小孩围成一个圈分糖果，老师分给第一个小孩10块，第二个小孩2块，第三个小孩8块，第四个小孩22块，第五个小孩16块，第六个小孩4块，第七个小孩10块，第八个小孩6块，第九个小孩14块，第十个小孩20块。然后所有的小孩同时将手中的糖果一半给右边的小孩，糖果为奇数的人可向老师要一块。问，经过这样几次后大家手中的糖果的块数一样多？每个人各有多少块？


参考公式：

1. =REDUCE(+A2:A11,A2:A100,LAMBDA(x,y,IF(AND(@x=TAKE(x,,1)),x,HSTACK(CEILING(TAKE(x,,1)/2+VSTACK(TAKE(x,-1,1),TAKE(x,9,1))/2,2),x))))

复制代码

公式简要说明如下：
=REDUCE(
    +A2:A11,        初始每人糖块数量作为x初始值
    A2:A100,        引用单元格区域，控制循环次数（和单元格值无关），一共循环99次，可以使用A1:A30、1:1等代替
    LAMBDA(x, y,
        IF(
            AND(@x = TAKE(x, , 1)),   如果第一列的第一个值等于第一列所有值（每个人糖数量相等）就停止运算保留x不变
            x,
            HSTACK(
                CEILING(              每个人分完糖后，如果是奇数，就向上舍入到最接近偶数（因为可以再跟老师要一块）
                    TAKE(x, , 1) / 2 +     x最左侧列存储每个人糖数量的最新值。数量除以2，加上别人给的一半
                        VSTACK(TAKE(x, -1, 1), TAKE(x, 9, 1)) / 2,   每个人糖数量的一半，将最后一个人的拿到第一个去
                    2
                ),
                x
            )
        )
    )
)

cutecpu

1. =REDUCE("",MID(A2,ROW($1:99),1),LAMBDA(x,y,LET(s,TAKE(TEXTSPLIT(x,"("),,-2),IF(y=")",TEXTBEFORE(x,"(",-2)&REPT(INDEX(s,2),@s),x&IF(COUNT(-y)*ISERR(-RIGHT(x)),"(",)&y))))

复制代码

全部都用左括號來判斷

alan57

1. =REDUCE(+A3:A12,ROW(1:99),LAMBDA(x,y,LET(_a,TAKE(x,,1),_b,VSTACK(TAKE(_a,-1),DROP(_a,-1))/2+_a/2,_c,_b+MOD(_b,2),IF(AND(@_a=_a),x,HSTACK(_c,x)))))

复制代码

抄老师的，发一个。

shaowu459

循环替代x字符串内容的另外一个例子：找出最长有效的括号字符串。

题目比较简单，只发一下公式和截图：
问题1：返回最长有效的括号字符串

1. =LET(s,ROW($1:39),t,MID(A2,s,TOROW(s)),u,TOCOL(IF(REDUCE(t,s,LAMBDA(m,n,SUBSTITUTE(m,"()",)))="",t,\),3),@SORTBY(u,-LEN(u)))

复制代码

问题2：返回最长有效的括号字符串长度

1. =LET(s,ROW($1:39),t,MID(A2,s,TOROW(s)),MAX(LEN(IF(REDUCE(t,s,LAMBDA(m,n,SUBSTITUTE(m,"()",)))="",t,""))))

复制代码

onthetrip

开始的还能勉强看懂，从山脉数组开始就直接放弃了。这山脉数组我想了一下，用VBA都不知道应该怎么写^^

onthetrip

请问一下，IFS的这个参数是什么意思。

shaowu459

onthetrip 发表于 2023-9-1 16:06
请问一下，IFS的这个参数是什么意思。

除了前面的情况之外，其他所有情况都返回U。1代表恒成立，U是返回值。
比如说A情况返回xx，B情况返回XX，C情况返回XX，其他所有情况都返回U，最后两个参数就是1和U。

onthetrip

shaowu459 发表于 2023-9-1 16:56
除了前面的情况之外，其他所有情况都返回U。1代表恒成立，U是返回值。
比如说A情况返回xx，B情况返回XX ...

哦，明白了，谢谢

一杯绿茶来了

onthetrip 发表于 2023-9-1 15:15
开始的还能勉强看懂，从山脉数组开始就直接放弃了。这山脉数组我想了一下，用VBA都不知道应该怎么写^^

真心同意！山脉数组之前勉强看懂一点，还觉得蛮有意思，越向后越蒙圈，直接放弃了！哎！