怎么按条件去重计数

yusukme

图中A列是员工姓名且有重复，B列是员工所属的分公司。
请问怎么计算某个分公司去重后的员工数量？谢谢~

laomu2010

=COUNTA(UNIQUE(FILTER($A$1:$A$12,$B$1:$B$12=$D$2)))

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
   d(arr(i, 2))(arr(i, 1)) = ""
Next
brr = [d1].CurrentRegion
For i = 2 To UBound(brr)
   brr(i, 2) = d(brr(i, 1)).Count
Next
[d1].CurrentRegion = brr
End Sub

yusukme

zhangcheng6688 发表于 2024-7-24 12:26
学习一下字典，打扰了
Sub test()
arr = [a1].CurrentRegion

谢谢，好像很厉害的样子

yusukme

laomu2010 发表于 2024-7-24 10:29
=COUNTA(UNIQUE(FILTER($A$1:$A$12,$B$1:$B$12=$D$2)))

好厉害！非常非常感谢~~~

MR奔赴

zhangcheng6688 发表于 2024-7-24 12:26
学习一下字典，打扰了
Sub test()
arr = [a1].CurrentRegion

能请教一下什么是“学习一下字典”？第一句就没看懂

yusukme

MR奔赴 发表于 2024-7-24 16:54
能请教一下什么是“学习一下字典”？第一句就没看懂

我也不懂“学习字典”是什么意思

niko88819

yusukme 发表于 2024-7-24 13:49
谢谢，好像很厉害的样子

欢迎楼主登陆论坛
大家都非常乐意协助楼主解决问题,请楼主了解以下2条要点
1. 问题得到满意解答在你发贴首页(或是1楼) 先编辑后保存  把标题的 "求助" 改为 "已解决"
   https://club.excelhome.net/thread-1643934-1-1.html
2. 如果老师们做的好表现不错可以送花给老师奖励吧,参考这连接怎么评分
   http://club.excelhome.net/thread-682160-1-1.html

沈默00

数据透视表的计数功能就搞定了，

yusukme

沈默00 发表于 2024-7-25 07:36
数据透视表的计数功能就搞定了，

总归有不方便用透视表的时候