首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

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

2012-05-28 
excel里的公式抄到VBA里报错,a Application.WorksheetFunction.Sum(IIf(([B2:B11] 0), 1, 0))大家看看

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")

热点排行