怎么根据某一列的条件来计算另外一列不重复人员的数量

进击的乔巴

怎么根据某一列的条件来计算另外一列不重复人员的数量
计数.zip (8.05 KB, 下载次数: 15)

2021-10-9 23:15 上传

点击文件名下载附件
计数.zip

暗夜风云

F3=SUM(1/COUNTIF($C$3:$C$14,$C$3:$C$14)*($B$3:$B$14=$E3))，三建下拉

团子妈

=SUM(IFERROR(1/COUNTIFS($B$3:$B$14,E3,$C$3:$C$14,$C$3:$C$14),0))
或
=SUM(($B$3:$B$14=E3)*(1/COUNTIF($C$3:$C$14,$C$3:$C$14)))
都是数组公式。第二个公式sum换成sumproduct的话，可以不用数组

丢鸭毛过海

Sub 统计各组人数()
  Range("E3:F1000") = ""
  Dim arr, brr(), d As Object, i&
  Set d = CreateObject("scripting.dictionary")
  arr = Range("B2").CurrentRegion
  For i = 2 To UBound(arr)
  Set d(arr(i, 1)) = CreateObject("scripting.dictionary")
  Next
  For i = 2 To UBound(arr)
  d(arr(i, 1))(arr(i, 2)) = d(arr(i, 1))(arr(i, 2)) + 1
  Next
  ReDim brr(1 To d.Count, 1 To 2)
  For i = 0 To d.Count - 1
  brr(i + 1, 1) = d.keys()(i)
  brr(i + 1, 2) = d.items()(i).Count
  Next
  Range("E3").Resize(d.Count, 2) = brr
  Set d = Nothing
End Sub

用微笑掩饰狂喜

E3 公式
=UNIQUE(B3:B19)&""

F3 公式
=ROWS(UNIQUE(FILTER($B$3:$C$14,$B$3:$B$14=E3)))

广西小军

好嘞，感谢大神

南海一扬

这个太复杂了

金弹子

=SUMPRODUCT(($B$3:$B$14=E3)*(1/COUNTIF($C$3:$C$14,$C$3:$C$14)))

李文卓

=CONCAT(IF(FIND(MID(CONCAT(IF(E4=$B$3:$B$14,$C$3:$C$14,"")),ROW(1:9),1),CONCAT(IF(E4=$B$3:$B$14,$C$3:$C$14,"")))=ROW(1:9),MID(CONCAT(IF(E4=$B$3:$B$14,$C$3:$C$14,"")),ROW(1:9),1),""))
数组公式三键结束