С вашего разрешения я не в стиле R1C1, а в обычном A1. Результат будет в столбце F.
C2
=ПОИСКПОЗ(A2;A$1:A1;0)
D2
=ПОИСКПОЗ(C2;C$1:C1;0)
E2
=ЕСЛИ(C2>0;0;1)
F2
=ЕСЛИОШИБКА(E2;СУММЕСЛИ(A2:A10;A2;B2:B10)-СУММЕСЛИМН(B2:B10;C2:C10;">0";D2:D10;">0";A2:A10;A2))
Оптимизировать этот код, наверное, можно, но было лень.
А вообще такие вопросы здесь удаляют, потому что это нарушение правил, пункт 5.12.