一个公式合并部门计算金额

小凡、、、

zzq0117 发表于 2024-8-2 09:18
加入体验了，但GROUPBY函数还是用不成，结果是：#name?，这是什么原因？

加入后选择beta通道，会自动更新，更新后就有了，要是更新后还是没有可能是365版本的原因吧

zhangcheng6688

学习一下字典，打扰了
Sub test()
arr = [a1].CurrentRegion
Set d = CreateObject("scripting.dictionary")
ReDim brr(1 To UBound(arr), 1 To 3)
For i = 2 To UBound(arr)
   s = arr(i, 2)
   If Not d.exists(s) Then
      m = m + 1
      For j = 1 To 3
         brr(m, j) = arr(i, j * 2)
      Next
      d(s) = m
   Else
      r = d(s)
      brr(r, 2) = brr(r, 2) + arr(i, 4)
      brr(r, 3) = brr(r, 3) + arr(i, 6)
   End If
Next
[h8].Resize(m, 3) = brr
End Sub

我的城市你来过

=IFERROR(LET(a,REDUCE(HSTACK($B$1,D1,F1),UNIQUE($B$2:$B$7),LAMBDA(x,y,VSTACK(x,HSTACK(y,BYCOL(FILTER(HSTACK(D2:D7,F2:F7),$B$2:$B$7=y),SUM))))),HSTACK(a,CHOOSECOLS(a,3)/CHOOSECOLS(a,2))),$E$1)