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