Private Sub Worksheet_Change()
CheckGoalSeek
End Sub
Private Sub CheckGoalSeek()
With Worksheets("Inverse")
.Range("E19").GoalSeek _
Goal:=0, _
ChangingCell:=.Range("B19")
End With
Private Sub Worksheet_Change()
CheckGoalSee