[已解决]求助多条件不重计数问题

jszjglrf

求助多条件不重计数问题

最佳答案

月排行榜 / 总排行榜

tgydslr

2014-12-18 15:18

1. =COUNT(1/(MATCH(IF((B2:B18="aaa")*(C2:C18<>"qq")*(D2:D18>0),A2:A18),IF((B2:B18="aaa")*(C2:C18<>"qq")*(D2:D18>0),A2:A18),)=ROW(1:17)))-1

复制代码

三键结束

跳转到最佳答案楼层

tgydslr

1. =COUNT(1/(MATCH(IF((B2:B18="aaa")*(C2:C18<>"qq")*(D2:D18>0),A2:A18),IF((B2:B18="aaa")*(C2:C18<>"qq")*(D2:D18>0),A2:A18),)=ROW(1:17)))-1

复制代码

三键结束

grf1973

用代码吧，结果显示在单元格F15

1. Sub tt()
   
2.     arr = [a1].CurrentRegion
   
3.     Set d = CreateObject("scripting.dictionary")
   
4.     For i = 2 To UBound(arr)
   
5.         If arr(i, 2) = "aaa" And arr(i, 3) <> "qq" And arr(i, 4) > 0 Then d(arr(i, 1)) = d(arr(i, 1)) + 1
   
6.     Next
   
7.     [f15] = d.Count
   
8. End Sub

复制代码