用vba做多条件汇总求和

可以使用 VBA 编写多条件汇总求和的代码，具体实现方法可以参考以下示例代码：

Sub MultiConditionSum()
Dim i As Long
Dim lastRow As Long
Dim sumResult As Double
Dim criteria1 As String
Dim criteria2 As String

lastRow = Range("A" & Rows.Count).End(xlUp).Row '获取数据最后一行的行号

criteria1 = "条件1" '设置第一个条件
criteria2 = "条件2" '设置第二个条件

For i = 2 To lastRow '循环遍历数据
If Range("A" & i).Value = criteria1 And Range("B" & i).Value = criteria2 Then '判断是否符合条件
sumResult = sumResult + Range("C" & i).Value '累加求和
End If
Next i

Range("E2").Value = sumResult '将结果输出到指定单元格
End Sub

注意：以上代码仅为示例，具体实现需要根据实际情况进行调整。