计算一列数据中次数最多的前2名的名字

无关岁月

天涯论剑 发表于 2023-11-20 20:27
老哥，这个的确有点难，可以实现嘛？

前5名

1. =TEXTJOIN(",",1,FILTER(UNIQUE(data!AB$2:AB$3464),LARGE(UNIQUE(COUNTIFS(data!AB:AB,UNIQUE(data!AB$2:AB$3464),data!Z:Z,"已妥投")),ROW(A1))=COUNTIFS(data!AB:AB,UNIQUE(data!AB$2:AB$3464),data!Z:Z,"已妥投")))

复制代码

后5名

1. =TEXTJOIN(",",1,FILTER(UNIQUE(data!AB$2:AB$3464),SMALL(UNIQUE(COUNTIFS(data!AB:AB,UNIQUE(data!AB$2:AB$3464),data!Z:Z,"已妥投")),ROW(A1))=COUNTIFS(data!AB:AB,UNIQUE(data!AB$2:AB$3464),data!Z:Z,"已妥投")))

复制代码

yellowhawk

开始感觉这个问题比较容易，结果动手做，发现蛮难的。向大家学习了。
我想=(IF(B2:B10="超时",A2:A10,"座")={"A","B","C","D"})*({1,2,3,4})，通过这样，后面不知道做了
想法是，统计这个里1，2，3，4的个数，先出最大的，对应A,选出第二大的，对应B.
知识瓶颈，做不出来了。

yellowhawk

用VBA解如下结果。
Sub 选择()
Dim arr, brr, a, b, r
Dim d
Set d = CreateObject("scripting.dictionary")
r = Cells.Find("*", Cells(1, 1), xlValues, xlWhole, xlByRows, xlPrevious).Row
arr = Range("A2:B" & r)
For i = 1 To UBound(arr)
If arr(i, 2) = "超时" Then
d(arr(i, 1)) = d(arr(i, 1)) + 1
  End If
Next
b = d.items
crr = d.keys
Range("e2") = crr(Application.Match(Application.Large(b, 1), b, 0) - 1)
Range("e3") = crr(Application.Match(Application.Large(b, 2), b, 0) - 1)

End Sub

天涯论剑

无关岁月 发表于 2023-11-20 21:35
前5名

后5名

感谢感谢，太感谢了大佬

edwin11891

无关岁月 发表于 2023-11-20 21:35
前5名

后5名

无关岁月

edwin11891 发表于 2023-11-21 18:39

这样就很明了了

heylittleguy

无关岁月 发表于 2023-11-20 17:24
J2下拉

老师好，您的公式写得很妙，学了半天，其中有一处"row(A1)"好像应该是"1"：=INDEX(A:A,RIGHT(LARGE(IF(COUNTIF(J$1:J1,A$2:A$10)=0,COUNTIFS(A$2:A$10,A$2:A$10,B$2:B$10,"超时")/1%+ROW($2:$10)),1),2))

无关岁月

heylittleguy 发表于 2023-11-21 22:05
老师好，您的公式写得很妙，学了半天，其中有一处"row(A1)"好像应该是"1"：=INDEX(A:A,RIGHT(LARGE(IF(CO ...

写1的话，就把公式写死了，公式往下拉就不会变化了，用row(a1),公式往下拉就会依次变成row(a2),row(a3),也就依次求出第一名，第二名，第三名

kxm1975

{=INDEX(SORTBY(UNIQUE($A$2:$A$10),COUNTIFS($A$2:$A$10,UNIQUE($A$2:$A$10),$B$2:$B$10,"超时"),-1),ROW(A1))}

heylittleguy

无关岁月 发表于 2023-11-21 22:13
写1的话，就把公式写死了，公式往下拉就不会变化了，用row(a1),公式往下拉就会依次变成row(a2),row(a3), ...

噢噢，主要是我试过用您的公式下拉到J4单元格，出来的结果是D，row(a1)改为1之后，J4单元格反而是想要的结果C