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

2024-12-20 14:21:17

推荐回答（3个）

回答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单元格。

回答2：

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

这个是与函数
D1单元格输入函数
=sum(A:A,B2,C:C)
是一样的

回答3：

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