reduce 循环堆积问题

wgreen

请大神帮忙看看，reduce循环堆积，公式不知错在哪里？

无关岁月

1. =DROP(GROUPBY(HSTACK(SCAN(0,A2:A9<>A1:A8,SUM),A2:A9),B2:B9,SUM,,0),,1)

复制代码

cnmlgb9998

你就差临门一脚 了。看图，希望你能明白。

wgreen

cnmlgb9998 发表于 2024-9-7 21:27
你就差临门一脚 了。看图，希望你能明白。

请问：TAKE(X,-1,1)本就是取得最后一行第一列的值，为什么还要加@这个呢，论坛中有@take(x,-1)表示左上角第一个值 的写法

wgreen

无关岁月 发表于 2024-9-7 21:27

另一种思路，厉害，大神呀

ww87725244

=REDUCE({"姓名","合计"},A2:A9,LAMBDA(x,y,IF(OFFSET(y,-1,)=y,VSTACK(DROP(x,-1),HSTACK(y,SUM(TAKE(x,-1,-1),OFFSET(y,,1)))),VSTACK(x,HSTACK(y,OFFSET(y,,1))))))

zhangcheng6688

学习一下数组，打扰了
Sub test()
arr = [a1].CurrentRegion
ReDim brr(1 To UBound(arr), 1 To 2)
ss = 2
On Error Resume Next
For i = 2 To UBound(arr)
   If arr(i, 1) <> arr(i + 1, 1) Then
      m = m + 1
      brr(m, 1) = arr(ss, 1)
      For j = ss To i
         brr(m, 2) = brr(m, 2) + arr(j, 2)
      Next
      ss = i + 1
   End If
Next
[f2].Resize(m, 2) = brr
End Sub

我走我流

=REDUCE(A1:B1,A2:A9,LAMBDA(x,y,IF(OFFSET(y,-1,)=y,x,VSTACK(x,CHOOSE({1,2},y,SUM(OFFSET(y,,1,MATCH(1=0,y:A10=y,-1))))))))