Goal seek VBA with embedded IF statements

[guyza]

I am trying to run an automatic goal seek via a button and am not sure what the Macro VBA code should be. The forumla should ideally auto calculate (without having to press the button if possible).

The calculation is to determine an initial loan repayment amount (cell I10).
Depending on the term of the loan (cell d7 [measured in months) the cell to be modified will change (column M).

Essentially for every year the cell reference in column M increases by 12.
i.e. for 12 months = M32, 24 month = M44.....for 84 months=M104

All information is based in worksheet 'Rental Schedule (2)'

if d7 = 36 then goal seek cell M56 to equal zero by changing cell i10
if d7 = 48 then goal seek cell M68 to equal zero by changing cell i10
if d7 = 60 then goal seek cell M80 to equal zero by changing cell i10
if d7 = 72 then goal seek cell M92 to equal zero by changing cell i10
if d7 = 84 then goal seek cell M104 to equal zero by changing cell i10

Please help.

 

[guyza]

Any help here? Assistance would be greatly appreciated!