Find sum of next three column values (observations) after SUM of previous observations reached a certain level

[smide]

Hello.

In column B I have a list of values (observations) and in column C I calculated the sum of those observations.
Somehow I need a sum of next three observations after SUM in COLUMN C (TOTAL) reached certain level (number).

Example.

Finding sum of next three values in column B, after Total (column C) reached at least ten (10) or more.
Result(s) should be placed in column E (E2:E).
Input cell (which contains required "level", 10 in this case) is cell D2.

	A	B	C	D	E	F
1		Observations	Sum of Observations	required "level"	Results	...
2		2	2	10	-8
3		6	8		-2
4		-1	7
5		5	12
6		-4	8
7		3	11
8		-7	4
9		2	6
10		3	9
11		-2	7
12		....	...
13		....	...
14		....	...

<tbody>
</tbody>

Results in column E (adding values from column B): -4+3-7 = -8 , (B6+B7+B8)
-7+2+3= -2 , (B8+B9+B10)

 

[mburrows]

Could you explain what the column D is supposed to represent, the "level"?

How have you decided where your total numbers matter? I assume it is only after the bold ones that you want to use in working out your E column?

 

[smide]

Could you explain what the column D is supposed to represent, the "level"?

How have you decided where your total numbers matter? I assume it is only after the bold ones that you want to use in working out your E column?

Yes, "after" is key word.
The "bold ones" (in column C - SUM column) are those equal or more than "required level" , number ten (10) in cell D2 of my example (which of course I choose arbitrarily).

 

[mburrows]

This code should work. Will need to be run each time any data is added/changed:

Sub Results()

Dim Level As Double
Dim i As Integer
Dim j As Integer

Level = Range("D2").Value
j = 2

For i = 2 To Range("C2").End(xlDown).Row
    If Cells(i, 3) >= Level Then
        Cells(j, 5).Value = Cells(i + 1, 2).Value + Cells(i + 2, 2).Value + Cells(i + 3, 2).Value
        j = j + 1
    End If
Next i

End Sub