Hi

One way
Enter in B2
=IF(A3="",SUM($A$1:A2)-SUM($B$1:B1),"")
and copy down

--

Regards
Roger Govier

"Alam" wrote in message
...
As figure shown below I want the sub total shown on right side of figure
column, to be automatically calculated by Excel formula or VBA macro.(e.g
when the empty cell appear in the figure column accordingly subtotal
calculated in right side of the figure column.

1,710.60
1,661.10 3,371.70

2,404.00
1,020.00
1,907.40
1,753.08
2,560.30
2,825.90 12,470.68

1,965.60
1,625.60 3,591.20

2,302.20 2,302.20

2,429.10 2,429.10

2,006.40 2,006.40

Regards