VBA研究VBA中如何用求和函数SUM求和

Posted 2022-08-16 宋哥

作者：iamlaosong

SUM是Excel的函数，在VBA中调用需要加上Application.WorksheetFunction.Sum()，但是，Excel写法却不能用。

比如，excel单元格中可以写成=sum(d2:d100)，VBA中是不能这么写的，即使加上引号写成Application.WorksheetFunction.Sum(“d2:d100”)，语法上倒是没什么问题，却得不到正确的结果。

正确的写法是：Application.WorksheetFunction.Sum(range(“d2:d100”))，如果用变量，写法如下：

        maxrow = [D65536].End(xlUp).Row             '行数，出库单号数量
        shuliang = Application.WorksheetFunction.Sum(Range("d2:d" & maxrow))

其中：

Application表示当前的EXCEL运行的程序。
WorksheetFunction表示调用当前EXCEL程序里的公式。
后面出现的SUM就是EXCEL里的默认公式。

Excel求和函数很多，如下：

SUM、SUMIF、SUMIFS、SUMPRODUCT、DSUM