=LET(_base_cond; C2>=0;
_zakup; C2*D2;
_prod; ЕСЛИ(C2<=0;C2;0);
_nakop_prod; ABS(H2-_prod);
_arr; ФИЛЬТР($C$2:D2;($C$2:C2>0)*($A$2:A2 = A2));
_sum; СУММ(ИНДЕКС(_arr;0;1));
_seq; ПОСЛЕД(_sum;;1;1);
_pr; SCAN(0;ИНДЕКС(_arr;0;1);LAMBDA(a;b;a+b));
_seq2; MAP(_seq;LAMBDA(a;ИНДЕКС(_arr;ПОИСКПОЗ(ПРОСМОТРX(a;_pr;_pr;0;1);_pr;0);2)));
_sebes; ИНДЕКС(_seq2;ПОСЛЕД(ABS(_prod);;_nakop_prod+1;1);1);
_result; ЕСЛИ(_base_cond; _zakup; -СУММ(_sebes));
ЕСЛИОШИБКА(_result; "продажа в минус"))