TA贡献1809条经验 获得超8个赞
1、示例代码:
Sub test1() Dim x As Long x = WorksheetFunction.SumIf(Range("A2:A9"), Range("C2").Value, Range("B2:B9")) Range("D2").Value = xEnd Sub
2、如下图:
3、以上代码的作用是:调用工作表函数SUMIF,求A2:A9范围内符合C2单元格条件,对应的B2:B9范围内数值之和,结果输出到D2单元格。
TA贡献2011条经验 获得超2个赞
sum函数里不能加双引号,双引号表示里面的是文本,不是变量。
我用的代码如下:
b1 = Cells(28, 23).Address
b2 = Cells(28, 23 + yue).Address
b3 = b1 &
":"
& b2
b = Application.WorksheetFunction.Sum(Range(b3))
没有找到匹配的内容?试试慕课网站内搜索吧
举报
购课补贴联系客服咨询优惠详情
慕课网APP您的移动学习伙伴
扫描二维码关注慕课网微信公众号