VBA Excel,VLookup为多个值计数
我有一个Excel文件。
EmployeeName Expenses Ajay 2000 Vijay 1000 Ajay 1500 Vijay 500
我想统计每个员工的开支数量。 我可以像这样用Vlookup得到给定员工的费用的第一次出现
sExpense = XLApplication.VLookup("Ajay", Range("A1:B99"), 2, False)
但是,我怎样才能find给定员工的所有费用的总和。
Option Explicit Public Sub test() Dim sExpense As String Dim range1 As Range Dim sumRange As Range Set range1 = Range("A2:A5") Set sumRange = Range("b2:b5") sExpense = Me.Application.WorksheetFunction.SumIf(range1, "Ajay", sumRange) End Sub
你可以使用excel提供的SUMIF函数:
例如
C6=SUMIF(A:A,"Vijay",B:B)
它通过A:A(A列)中的范围来查看任何单元格匹配“Ajay”,并在B列中总计它们的总和