It would be better to use formulas..see attached workbook. There are formulas in columns C and H down to row 10, but you can drag them down as far as you want...
If you are still wanting to use a macro, then someone will come along soon and fix yours for you. I don't have time right now...
:-)
Albert