Help with VB in excel

[MisterR]

Hi guys! I am really newbie in making my formulas in excel...I mean i can calculate with simple formulas and If statements, but i am really bad in other more complex stuff..So i need some help and i would appretiate it if you can help me with the following situation:
I have to make a formula with which to distribute a common sum in the cells to the right (the same row) according to a givven quota. After the common sum falls down below the givven quota, i have to write the ending balance in the last cell.
Here is the chart:
[TABLE="class: grid, width: 50, align: left"]
<tbody>[TR]
[TD]Common sum[/TD]
[TD]Quota[/TD]
[TD][/TD]
[TD]Cell1[/TD]
[TD]Cell2[/TD]
[TD]Cell3[/TD]
[TD]Cell4[/TD]
[TD]Cell5[/TD]
[/TR]
[TR]
[TD]5000[/TD]
[TD]1000[/TD]
[TD][/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[/TR]
[TR]
[TD]4500[/TD]
[TD]1000[/TD]
[TD][/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]1000[/TD]
[TD]500[/TD]
[/TR]
</tbody>[/TABLE]






I would be really glad if you can help me with this problem because i cannot find a solution for it by myself!
Thanks a lot guys!

 

[FormR]

Hi, welcome to the forum.

Your thread title suggests you are looking for VBA code, but maybe a formula will suffice?

Excel 2012
	A	B	C	D	E	F	G	H	I
1	Common sum	Quota		Cell1	Cell2	Cell3	Cell4	Cell5	Cell5
2	5000	1000		1000	1000	1000	1000	1000	0
3	4500	1000		1000	1000	1000	1000	500	0
4	3150	600		600	600	600	600	600	150
Sheet1

Cell Formulas
Range	Formula
D2	=MAX(0,MIN($A2-$B2*(COLUMNS($D2:D2)-1),$B2))

 

[jumbledore]

in cell D2 put the formula as

MIN(A2,B2)

and copy the formula for the entire column

In cell E2,

MIN($A2-SUM($D2:D2),$B2)

and copy it in the remaining cells

 

[MisterR]

in cell D2 put the formula as

MIN(A2,B2)

and copy the formula for the entire column

In cell E2,

MIN($A2-SUM($D2:D2),$B2)

and copy it in the remaining cells

Thank you guys! Both of this worked but i implemented the second code! Thanks a lot !

 

[MisterR]

Worked perfectly but i used the seocnd code ! Thanks guys!