I have foll data

criteria score Unique answer
yes 4 yes 20
yes 6 no 116
yes 6
yes 4
no 45
no 57
no 6
no 8

I need is sum of all the score for each criteria

Yes would give 20
No would give 116

I tried the foll...

Range("b3").Value = Application.WorksheetFunction.SumIf(Range("a:a"),
Range("c2"), Range("b:b"))

Problem is the criteria "c2", i wish to change using a loop. i cannot use
sumproduct because the criteria are more in number close to 50.

Thsi something very imp for me and i am badly stuck.. please help..

Thanks!
Boss