WorksheetFunction.SumIf(Arg1, Arg2, Arg3)
引数Arg1の範囲にあるArg2に一致する条件値のArg3の値の数値の合計を計算するワークシートのメソッドです。
[WorksheetFunction.SumIf(条件範囲,検索条件,合計範囲)]
引数Arg1の範囲にあるArg2に一致する条件値のArg3の値の数値の合計を計算するワークシートのメソッドです。
[WorksheetFunction.SumIf(条件範囲,検索条件,合計範囲)]
| 名前 | 説明 | 型 | 備考 |
|---|---|---|---|
| Arg1 | 検索対象範囲 | Range | 必須 |
| Arg2 | 検索文字列 | Variant | 必須 |
| Arg3 | 合計範囲 | Variant | 必須 |
引数に入れる順番内容はExcel関数のSUMIFと同じです
例 下記ExcelシートのYamadaの数字の合計を"B2"セルに表示
Sub SampleSumif()
Dim Worksh As Worksheet
Set Worksh = ThisWorkbook.Worksheets(1)
Worksh.Range("B1") = WorksheetFunction.SumIf _
(Worksh.Range(Cells(5, 1), Cells(10, 1)), _
Worksh.Range("A1"), _
Worksh.Range(Cells(5, 2), Cells(10, 2)))
End Sub