Excel VBA调用Excel函数示例-sumif()条件求和

Question

如题所述

Answer 1

1、示例代码：

Sub test1()
    Dim x As Long
    x = WorksheetFunction.SumIf(Range("A2:A9"), Range("C2").Value, Range("B2:B9"))
    Range("D2").Value = x
End Sub

2、如下图：

3、以上代码的作用是：调用工作表函数SUMIF，求A2:A9范围内符合C2单元格条件，对应的B2:B9范围内数值之和，结果输出到D2单元格。

Answer 2

Range("D1") = WorksheetFunction.SumIf(Range("A:A"), Range("B2"), Range("C:C"))

这个是与函数
D1单元格输入函数
=sum(A:A,B2,C:C)
是一样的本回答被网友采纳

Answer 3

Range("D1") = Function.SumIf(Range("A:A"), Range("B2"), Range("C:C"))