Sum of Negative or Positive, Exclude 0 or Include 0

ibmy

Board Regular
Joined
Mar 4, 2020
Messages
134
Office Version
  1. 2016
Platform
  1. Windows
Hi Excel Experts ?

Sample of 20k row data I face weekday :
dx 2.1.21.xlsb
BCDEF
1Sum of Negative Sum of Positive
2ValueExclude 0Include 0Exclude 0Include 0
30.10.1
40
50
60.10.10.2
7-0.4-0.4-0.4
8111
9-0.6
10-0.2-0.8-0.8
110.60.60.6
120
13-0.1-0.1
140
15-0.3-0.3
160
17-0.3
18-0.1
19-0.1
20-0.2
21-0.6-1.3-1.7
220.1
230.3
240.4
250.4
260.11.31.3
27-0.1-0.1-0.1
28111
Sheet7

Found similiar thread ( Ignoring Blank cells find Sum, count no. Of negative numbers ) but it for Negative numbers, blank cell and not continous sum for each row.

Rule for Sum of Negative ( Exclude 0 ) :
1. Start with Negative value.
2. Stop sum if value are Positive or 0. ( >=0 )
3. Start new find for Negative value on next row.

Rule for Sum of Negative ( Include 0 ) :
1. Start with Negative value.
2. Stop sum if value is Positive. ( >0 )
3. Start new find for Negative value on next row.

Rule for Sum Postive (Exclude 0,<=0 & Include 0,<0 ) same as above, just opposite of it.

Thanks.
 

Excel Facts

Square and cube roots
The =SQRT(25) is a square root. For a cube root, use =125^(1/3). For a fourth root, use =625^(1/4).
Try this with one difference at result (yellow cell):
Book1
ABCDEF
1Sum of Negative Sum of Positive
2ValueExclude 0Include 0Exclude 0Include 0
30.1  0.1 
40    
50    
60.1  0.10.2
7-0.4-0.4-0.4  
81  11
9-0.6    
10-0.2-0.8-0.8  
110.6  0.6 
120    
13-0.1-0.1   
140    
15-0.3-0.3   
160    
17-0.3    
18-0.1    
19-0.1    
20-0.2    
21-0.6-1.3-1.7  
220.1    
230.3    
240.4    
250.4    
260.1  1.31.9
27-0.1-0.1-0.1  
2810011
29
Sheet1
Cell Formulas
RangeFormula
B3:B28B3=IF(($A4>=0)*($A3<0)+(A4=""),SUMIFS($A$2:$A3,$A$2:$A3,"<"&0)-SUM(B$2:B2),"")
C3:C28C3=IF(($A4>0)*($A3<0)+(A4=""),SUMIFS($A$2:$A3,$A$2:$A3,"<"&0)-SUM(C$2:C2),"")
D3:D28D3=IF(($A4<=0)*($A3>0)+(A4=""),SUMIFS($A$2:$A3,$A$2:$A3,">"&0)-SUM(D$2:D2),"")
E3:E28E3=IF(($A4<0)*($A3>0)+(A4=""),SUMIFS($A$2:$A3,$A$2:$A3,">="&0)-SUM(E$2:E2),"")
 
Upvote 0
I have a different slight difference. :)

(BTW @maabadi you also have a difference in B28 & C28)

21 02 03.xlsm
ABCDE
1Sum of Negative Sum of Positive
2ValueExclude 0Include 0Exclude 0Include 0
30.1  0.1 
40    
50    
60.1  0.10.2
7-0.4-0.4-0.4  
81  11
9-0.6    
10-0.2-0.8-0.8  
110.6  0.6 
120   0.6
13-0.1-0.1   
140    
15-0.3-0.3   
160    
17-0.3    
18-0.1    
19-0.1    
20-0.2    
21-0.6-1.3-1.7  
220.1    
230.3    
240.4    
250.4    
260.1  1.31.3
27-0.1-0.1-0.1  
281  11
Sheet2 (2)
Cell Formulas
RangeFormula
B3:B28B3=IF(AND(A3<0,A4>=0),SUMIF(A$3:A3,"<0")-SUM(B$2:B2),"")
C3:C28C3=IF(AND(A3<0,OR(A4>0,A4="")),SUMIF(A$3:A3,"<0")-SUM(C$2:C2),"")
D3:D28D3=IF(AND(A3>0,A4<=0),SUMIF(A$3:A3,">0")-SUM(D$2:D2),"")
E3:E28E3=IF(AND(A3>=0,OR(A4<0,A4="")),IF(SUMIF(A$3:A3,">0")-SUM(E$2:E2)=0,"",SUMIF(A$3:A3,">0")-SUM(E$2:E2)),"")
 
Upvote 0
With vba:
VBA Code:
Sub a1160492a()
'https://www.mrexcel.com/board/threads/sum-of-negative-or-positive-exclude-0-or-include-0.1160492/
Dim va
Dim a As Double, b As Double, c As Double, d As Double, x As Double
Dim i As Long

va = Range("A3", Cells(Rows.Count, "A").End(xlUp))
ReDim vb(1 To UBound(va, 1), 1 To 4)

For i = 1 To UBound(va, 1)
    x = va(i, 1)
    If x < 0 Then
        a = a + x
        If i = UBound(vb, 1) Then vb(i, 1) = a
    Else
        If a <> 0 Then vb(i - 1, 1) = a: a = 0
    End If
    
    If x < 0 Then
          b = b + x
          If i = UBound(vb, 1) Then vb(i, 2) = b
    ElseIf x > 0 Then
        If b <> 0 Then vb(i - 1, 2) = b: b = 0
    End If
    
    If x > 0 Then
        c = c + x
        If i = UBound(vb, 1) Then vb(i, 3) = c
    Else
        If c <> 0 Then vb(i - 1, 3) = c: c = 0
    End If
    
    If x > 0 Then
          d = d + x
          If i = UBound(vb, 1) Then vb(i, 4) = d
    ElseIf x < 0 Then
        If d <> 0 Then vb(i - 1, 4) = d: d = 0
    End If

Next

Range("B3").Resize(UBound(vb, 1), 4) = vb
End Sub

Book2
ABCDE
1
2Value
30.10.1
40
50
60.10.10.2
7-0.4-0.4-0.4
8111
9-0.6
10-0.2-0.8-0.8
110.60.6
1200.6
13-0.1-0.1
140
15-0.3-0.3
160
17-0.3
18-0.1
19-0.1
20-0.2
21-0.6-1.3-1.7
220.1
230.3
240.4
250.4
260.11.31.3
27-0.1-0.1-0.1
28111
Sheet3
 
Upvote 0
Thanks to all kind-hearted helper ? @maabadi @Peter_SSs @Akuini . I wish you all good health ? , the days ahead are filled with joy and prosperity ?

@Akuini Thanks for the code. May I request for another 2 different ouput, the rule are still the same. I tried to modify the code you given but not success since I no good at code.

Output 1:
2.15.2021.xlsb
DEFGHI
1Sum of PositiveSum of Negative
2Set 1Exclude 0Include 0Set 2Exclude 0Include 0
30.10.1-0.3-0.3
400
500-0.3
60.10.10.20.1
7-0.40
8111-0.4-0.4
9-0.60
10-0.2-0.3-0.3
110.60.60-0.7
1200.60.5
13-0.10.2
1400.1
15-0.3-0.1-0.1
1600-0.1
17-0.30.7
18-0.1-0.4
19-0.1-0.8
20-0.2-1.2
21-0.6-1.7-4.1
220.10-4.1
230.30.2
240.4-0.6-0.6-0.6
250.40.2
260.11.31.3-0.2-0.2
27-0.10
28111-1.7-1.7-1.9
Sheet4

What difference from before:
(1) Set of data : Sum of Positive & Negative has their own data set (Column D = Positive , Column G = Negative )
Before : Both Sum Positive & Negative are using same data set in Column A.

(2) Arrangement of data : Sum of Positive is calculated first then Negative (Column E & F = Sum of Positive, Column H & I = Sum of Negative)
Before : Sum of Negative is calculated first in Column B & C, then Positive in Column D & E.

(3) Star and End of Column : The data start in Column D, ends in Column I.
Before : Start in Column A, ends in Column E


Output 2:
2.15.2021.xlsb
DEFG
1Sum of PositiveSum of Negative
2Set 1Include 0Set 2Include 0
30.1-0.3
400
500-0.3
60.10.20.1
7-0.40
811-0.4
9-0.60
10-0.2-0.3
110.60-0.7
1200.60.5
13-0.10.2
1400.1
15-0.3-0.1
1600-0.1
17-0.30.7
18-0.1-0.4
19-0.1-0.8
20-0.2-1.2
21-0.6-1.7
220.10-4.1
230.30.2
240.4-0.6-0.6
250.40.2
260.11.3-0.2
27-0.10
2811-1.7-1.9
Sheet7

Same as Output 1, just remove "Exclude 0" part for both Sum Positive & Negative in Column E & H so:
(1) Set of data for Negative is moved from Column G to F
(2) Column "Include 0" for Positive is move from Column F to E & Column "Include 0" for Negative is move from Column I to G
(3) Now, Last Column is G, before is Column I. Start of column is still the same for both Output which is D
 
Upvote 0

Forum statistics

Threads
1,223,948
Messages
6,175,579
Members
452,653
Latest member
craigje92

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top