VBA Goal Seek

Hi,

I'm hoping someone can help me. I've written a basic goal seek macro but what i need to be able to do is save the value of the cell that is being changed before the goal seek is applied (variable x in the example below). In the next stage of this program, I need to be able to use the difference between this value pre and post goal seek but can only do this if the macro can recognise the value of this variable before it is changed during the goal seek function.

So far my macro reads as follows:


Sub MaxHedgeRate()

Application.ScreenUpdating = False

Set x = Range("LoanMargin")
Set y = Range("ICRCovenant")
Set z = Range("MinICR")

z.GoalSeek Goal:=y, ChangingCell:=x

End Sub

Any help would be greatly appreciated.

Thanks,

Kerry