Excel中如果能有这个函数,中国式排名就很简单了!

网友投稿 487 2022-11-22

Excel中如果能有这个函数,中国式排名就很简单了!

要根据学生的考试成绩计算下排名,直接用Excel中内置的函数RANK,结果如下:

有两位同学为并列第四,可之后就直接第六名了,第五名不见了,这并不符合我们的习惯,从小到大,每次考试后并列的名次很常见,可是不会缺少一个中间的名次。

怎么解决上述问题呢?

参加过我函数培训班的同学写这个公式应该不成问题:=SUMPRODUCT(($B$2:$B$20>=B2)/(COUNTIF($B$2:$B$20,$B$2:$B$20)))懂数组的基础,知道其中套路的话,这公式也不难理解。

如果你会VBA的话,写个自定义函数,以后就可以这样了:

或者复制下面的代码,另存为加载宏,需要的时候加载下,不需要的时候取消加载,这也是极好的。

代码如下:

‘rng1 代表需要排名的单元格,rng2代表排名区域Function crank(rng1 As Range, rng2 As Range) Dim arr, brr(), crr(), m&, i& arr = rng2 m = UBound(arr) ReDim brr(1 To m), crr(1 To m) For i = 1 To m brr(i) = Application.CountIf(rng2, arr(i, 1)) Next For i = 1 To m If rng1.Value <= arr(i, 1) Then crr(i) = 1 / brr(i) Else crr(i) = 0 End If Next crank = Application.Sum(crr)End Function

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:怎样在excel表格里标记完成
下一篇:Excel中sumproduct函数的3个使用小技巧!
相关文章