读书人

excel里的公式抄到VBA里报错解决办法

发布时间: 2013-01-09 09:38:16 作者: rapoo

excel里的公式抄到VBA里报错,
a = Application.WorksheetFunction.Sum(IIf(([B2:B11] > 0), 1, 0))
大家看看上面这句话有什么问题吗

excel里面
=SUM(IF((B4:B6 > 0), 1, 0))
用ctr+shift+enter是可以运行的
怎么搬到VBA就不行了呢
[解决办法]
=SUM(IF((B4:B6 > 0), 1, 0))是以数组输入方式输入的,vba里识别不出来这种输入方式
看你的公式的作用应该是求B4:B6中数据大于零的个数,可以用
Application.WorksheetFunction.CountIf([B4:B6], ">0")

读书人网 >VBA

热点推荐