Create a subtotal
 

From a list such as the following, I'd like to invoke a
macro to create the subtotals shown in the furthest right
column (one subtotal at a time), summing all items from
the first through the last indented item. It would be
invoked from the cell containing the subtotal.

Can anyone help?

Floor Finishes - Stone 35 SF $50.00 $1,750 $3,200
- Ceramic Tile 100 SF $12.50 $1,250
- VCT 100 SF $ 2.00 $ 200
Wall Finishes - DW/Pnt 100 SF $ 6.50 $ 650 $2,775
- Ceramic Tile 50 SF $12.50 $ 625
- Stone 20 SF $75.00 $1,500

TIA
Kevin Sprinkel