Roll-up sum

[FryGirl]

As you can see in column A, there is a level in this hierarchy structure. I would like to see a roll-up sum in columns H:K.

In columns D:G, I've already have the sum for the associated "Dept", but struggling with how to get the sums for any roll-ups past level 2.

For level 2 I used =IF(LEFT($B3,7)<>LEFT($B4,7),SUMPRODUCT(--(LEFT($B$4:$B$52,7)=LEFT($B4,7)),--(D$4:D$52)),"")

Struggling with row 6, 20, and 25. I've used Sumproduct because I'm putting this in VBA code and the workbook I'll be referencing is closed. This is to test the process/formula.

Unfourtunately because of work restrictions, I can only post the image.

 

[FryGirl]

Here is a range versus an image. Just trying to make a roll-up for those dependent to an upper level as seen in column A.

Book1.xlsx
	A	B	C	D	E	F	G	H	I	J	K	L
1	Level	Dept	Parent Dept
2		C10128	B3545	A	B	C	TOTAL	A	B	C	TOTAL
3	1	C101280000	C10128	32	87	41	160
4	2	C101281000	C101280000					1	10	4	15
5	3	C101281100	C101281000		4		4
6	3	C101281200	C101281000			2	2	1	6	2	9	Needed
7	4	C101281210	C101281200	1	6		7
8	3	C101281300	C101281000			2	2
9	2	C101282000	C101280000						6	4	10
10	3	C101282100	C101282000		3		3
11	3	C101282200	C101282000			2	2
12	3	C101282210	C101282000			1	1
13	3	C101282300	C101282000		2		2
14	3	C101282400	C101282000		1	1	2
15	2	C101284000	C101280000					2	8	8	18
16	3	C101284100	C101284000			4	4
17	3	C101284200	C101284000	2	6	4	12
18	3	C101284300	C101284000		2		2
19	2	C101285000	C101280000					29	63	25	117
20	3	C101285100	C101285000	2	10	2	14	7	20	9	36	Needed
21	4	C101285110	C101285100	3	3	1	7
22	4	C101285150	C101285100	1	1	3	5
23	4	C101285160	C101285100	1	6	2	9
24	4	C101285170	C101285100			1	1
25	3	C101285200	C101285000					22	43	16	81	Needed
26	4	C10128522B	C101285200	10	26	8	44
27	4	C10128522A	C101285200	3	4	2	9
28	4	C101285220	C101285200
29	4	C101285240	C101285200		2		2
30	4	C1012852L0	C101285200	5	11	5	21
31	4	C1012852M0	C101285200	1		1	2
32	4	C1012852N0	C101285200	3			3
Org Chart Data

Cell Formulas
Range	Formula
D3:G3	D3	=SUM(D4:D32)
H8:K19,H4:K5	H4	=IF(LEFT($B3,7)<>LEFT($B4,7),SUMPRODUCT(--(LEFT($B$4:$B$32,7)=LEFT($B4,7)),--(D$4:D$32)),"")
H6:K6	H6	=SUM(D6:D7)
H20:K20	H20	=SUM(D20:D24)
H25:K25	H25	=SUM(D26:D32)