请帮忙写个多条件 拖范围统计函数，谢谢

nirvanaren12

请帮忙写个函数，谢谢

huaichuan1

K2=COUNTIFS($B$2:$B$13,$J2,E$2:E$13,K$1) 左拉下拉

qwer401245

=MMULT({1,1,1},COUNTIFS(B:B,J2,OFFSET(D:D,,ROW($1:$3)),K$1:M$1))

part98

1. =SUM(($B$2:$B$13=$J2)*($E$2:$G$13=K$1))

复制代码

wgreen

=GROUPBY(B2:B13,E2:G13,COUNTA,0,0)

misterZ

zhangcheng6688

学习一下字典，打扰了
Sub test()
arr = [a1].CurrentRegion
Set d = CreateObject("scripting.dictionary")
For i = 2 To UBound(arr)
   If Not d.exists(arr(i, 2)) Then
      Set d(arr(i, 2)) = CreateObject("scripting.dictionary")
   End If
   For j = 5 To UBound(arr, 2)
      If arr(i, j) <> "" Then
         d(arr(i, 2))(arr(i, j)) = d(arr(i, 2))(arr(i, j)) + 1
      End If
   Next
Next
brr = [k1].CurrentRegion
For i = 2 To UBound(brr)
   For j = 2 To UBound(brr, 2)
      brr(i, j) = d(brr(i, 1))(brr(1, j))
   Next
Next
[k1].CurrentRegion = brr
End Sub