Distillation simulation using a spreadsheet

Steve,

I need help in setting up a repetitive Goal Seek on the attached spreadsheet.  I need to adjust the entries in column I (for each row after  row 43) such that each row in column H (after row 43) is always 1.  I did this manually for rows 44 - 46.  I need to continue the sheet for another 900 lines.

I need to set up a VB function to do this using Goal Seek.

Can you help?

DVD

Upload

Files: 

cms_simulation_by_simple_distillation.xls