SUMIFS VBA如何写
时间: 2024-09-30 20:16:17 浏览: 32
在VBA(Visual Basic for Applications)中,`SUMIFS`函数用于根据多个条件对一组数值求和。它的语法如下:
```vba
SumResult = Application.WorksheetFunction.SumIfs(DataSourceRange, Criteria1_Range, Criteria1_Value, [Criteria2_Range, Criteria2_Value], ... )
```
其中:
- `DataSourceRange` 是包含你要查找值的范围。
- `Criteria1_Range` 和 `Criteria1_Value` 是第一个条件范围和对应的值,例如如果你想查找A列中等于特定值的行。
- `Criteria2_Range`, `Criteria2_Value` 可以添加更多的条件,每个条件之间用逗号分隔。
一个简单的例子,假设你想计算A列和B列都满足一定条件的行的总和,你可以这样做:
```vba
Dim Sum As Double
Sum = WorksheetFunction.SumIfs(Sheets("Sheet1").Range("A:B"), Sheets("Sheet1").Range("A1:A10"), "特定值", Sheets("Sheet1").Range("B1:B10"), ">5")
MsgBox "符合条件的总和是: " & Sum
```
在这段代码中,“特定值”是你希望A列匹配的具体文本,">5"表示B列的值大于5。
记得替换相应的范围和值,以及实际的条件表达式。
阅读全文