сумма по заданному критерию

[Iskin]

Здравствуйте Гуру!
Есть такая задача. в 1 строке данные со значениями "р", "в", "п"
во 2 строке указаны цифровые значения. Как мне подсчитать суммы значений, но только для столбцов "в" и "п"? Пример в прикрепленной таблице.

[Anatole]

воспользуйся функцией "СУММЕСЛИ"

[IgorGO]

см.вложение

[Iskin]

спасибо IgorGO за пример. но я бы хотел посмотреть пример еще и через функцию. Понимаю, нагло, но может у кого есть заготовки...

[The_Prist]

Сообщение от Iskin

спасибо IgorGO за пример. но я бы хотел посмотреть пример еще и через функцию.

А у IgorGO что, не через функцию? Или Вы макросы имеете ввиду? Изъясняйтесь конкретней. Вот формула(тоже что и у IgorGO), только чуть покороче.
ФОРМУЛА МАССИВА! Это значит, что ввод надо завершать не просто Enter, а Ctrl+Shift+Enter.

[Iskin]

т.е. через Function
например:
'Возвращает количество совпадений
Function ПодсчитатьКоличествоВСтроке(Диапазо н As Range, Образец As String) As Integer
n = 0
For i = 1 To Диапазон.Count
If LCase(CStr(Диапазон.Item(i).Value)) = LCase(Образец) Then n = n + 1
Next i
ПодсчитатьКоличествоВСтроке = n
End Function

[Iskin]

забыл отметить, что 1-я строка со значениями "р", "в", "п"
она постоянно меняется. Это все делается для будущего табеля... В принципе могу выложить весь вариант табеля, который надо до завершить...