Bartłomiej L.

Bartłomiej L. Student, Uniwersytet
Ekonomiczny w
Poznaniu

Temat: problem z sumowaniem, Excel

Witam mam pewien problem z excelem,
posiadam kolumnę danych zawierającą głównie zera oraz pojedyncze wartości dodatnie oraz ujemne np.
0
1,2
0
0
-1.5
0
0
-1,1
0
-1
0
0
0
1,4
0
1,3
0
1,8
0
0
-1,6

Rzecz polega na tym aby w sprytny sposób policzyć sumy kolejnych par liczb o przeciwnych znakach. Mam problem z przypadkiem, gdy występują po sobie liczby o tych samych znakach. Dla powyższego przykładu sumy w komórkach powinny wyglądać następująco:
1,2 + (-1,5)
-1,1 + 1,4
-1 + 1,4
1,3 + (-1,6)
1,8 + (-1,6)

Ewentualnie:
1,2 + (-1,5)
-1,1 + 1,4 -1 + 1,4
1,3 + (-1,6) + 1,8 + (-1,6)

Zera pomiędzy kolejnymi sumami nie byłyby wielkim zmartwieniem.
Jeśli ktoś ma pomysł jak ten problem rozwiązać to proszę o pomoc.

PozdrawiamBartłomiej Lach edytował(a) ten post dnia 04.11.11 o godzinie 13:44
Tomasz Gryzio

Tomasz Gryzio Dyrektor
zarządzający/Trener/
Konsultant - It
School

Temat: problem z sumowaniem, Excel

Witam!

Założenia:
1. W arkuszu posiadam wypełniony zakres A1:A21 wartościami: {0;1,2;0;0;-1,5;0;0;-1,1;0;-1;0;0;0;1,4;0;1,3;0;1,8;0;0;-1,6}

Kroki:
1. W komórkę B1 wbijam tablicowo (ctrl+shift+enter) formułę:
a) w Excelu 2007, Excelu 2010:
=JEŻELI.BŁĄD( A1+JEŻELI(ORAZ(WIERSZ(A1)<>ILE.WIERSZY($A$1:$A$21);A1<>0);JEŻELI(A1>0;ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21<0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1));ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21>0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1)));"");"")

b) w Excelu 2003:
=JEŻELI(CZY.BŁĄD( A1+JEŻELI(ORAZ(WIERSZ(A1)<>ILE.WIERSZY($A$1:$A$21);A1<>0);JEŻELI(A1>0;ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21<0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1));ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21>0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1)));""));""; A1+JEŻELI(ORAZ(WIERSZ(A1)<>ILE.WIERSZY($A$1:$A$21);A1<>0);JEŻELI(A1>0;ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21<0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1));ADR.POŚR("a"&MIN.K(JEŻELI($A2:$A$21>0;WIERSZ(ADR.POŚR("a"&(WIERSZ(A1)+1)&":a"&ILE.WIERSZY($A$1:$A$21)));"");1)));""))

2. Przeciągam formułę do adresu A21

Pozdrawiam Tomasz Gryzio
Bartłomiej L.

Bartłomiej L. Student, Uniwersytet
Ekonomiczny w
Poznaniu

Temat: problem z sumowaniem, Excel

Działa idealnie, dzięki !

Następna dyskusja:

Excel 2016 - Problem z form...




Wyślij zaproszenie do