根据类型跟部门且日期为最新的金额

jylai

向老师求助公式

黄色为最终结果

无关岁月

1. =XLOOKUP(MAXIFS($A:$A,$B:$B,G$2,$C:$C,$F3)&G$2&$F3,$A$2:$A$24&$B$2:$B$24&$C$2:$C$24,$D$2:$D$24,0)

复制代码

jylai

无关岁月 发表于 2024-9-21 08:18

这么快就有结果了，老师您真牛，感谢！

高山磐石

=IFNA(DROP(REDUCE("",F3:F7,LAMBDA(XX,YY,VSTACK(XX,MAP(G2:I2,LAMBDA(X,XLOOKUP(MAX((C2:C24=YY)*(B2:B24=X)*(A2:A24)),A2:A24,D2:D24)))))),1),"")

袁勇

1. =IFERROR(MOD(AGGREGATE(14,6,($A$2:$A$24*10^6+$D$2:$D$24)/(($B$2:$B$24=G$2)*($C$2:$C$24=$F3)),1),10^6),0)

复制代码

waternew

=IFERROR(LOOKUP(1,0/(($B$2:$B$24=G$2)*($C$2:$C$24=$F3)),$D$2:$D$24),0)  日期按升序排序

你是那块小饼干

1. =PIVOTBY(C2:C24,B2:B24,D2:D24,SUM,0,0,,0,,C2:C24<>"")

复制代码

zhangcheng6688

学习一下字典
Sub test()
arr = [a1].CurrentRegion
Set d = CreateObject("scripting.dictionary")
For i = 2 To UBound(arr)
   If Not d.exists(arr(i, 3)) Then
      Set d(arr(i, 3)) = CreateObject("scripting.dictionary")
   End If
   If Not d(arr(i, 3)).exists(arr(i, 2)) Then
      d(arr(i, 3))(arr(i, 2)) = i
   Else
      r = d(arr(i, 3))(arr(i, 2))
      If arr(r, 1) < arr(i, 1) Then
         d(arr(i, 3))(arr(i, 2)) = i
      End If
   End If
Next
brr = [f1].CurrentRegion
For i = 3 To UBound(brr)
   For j = 2 To UBound(brr, 2)
      If d.exists(brr(i, 1)) Then
         If d(brr(i, 1)).exists(brr(2, j)) Then
            brr(i, j) = arr(d(brr(i, 1))(brr(2, j)), 4)
         Else
            brr(i, j) = 0
         End If
      Else
         brr(i, j) = 0
      End If
   Next
Next
[f2].CurrentRegion = brr
End Sub

世界客都

=SUMIFS($D:$D,$B:$B,G$2,$C:$C,$F3,$A:$A,MAXIFS($A:$A,$C:$C,$F3,$B:$B,G$2))

忙到飞起

=SUMIFS(D2:D24,C2:C24,F3:F7,B2:B24,G2:I2)