[算表] 自订Countif函数写法

楼主: home0303 (Blue night)   2018-05-22 09:21:18
软件:EXCEL
版本:2010
Function CountifMe(MyRange,MyCriteria)
For Each cell in MyRange
If cell = MyCriteria then 计数 = 计数 + 1
Next
CountifMe = 计数
End Function
一般情形下可正常使用 但有个问题是
当MyRange是整栏的情况下(如A:A)
函数会执行好一下子
当然这是可以理解的 毕竟For Each cell要跑100多万遍
只是我就好奇 内建的Countif函数是用什么方式
即使范围是整栏 仍然可以迅速计算结果呢
请指教 谢谢
作者: soyoso (我是耀宗)   2018-05-22 10:22:00
可将myrange的范围调整一下,取得整栏或范围的第一个储存格,以range.cells(1,1)整栏最后有值的储存格的,以range.end或range.find来回传
楼主: home0303 (Blue night)   2018-05-22 12:11:00
谢谢 我研究看看

Links booklink

Contact Us: admin [ a t ] ucptt.com