VBA目标SEEK宏不会显示结果

Question

我正在尝试写下一个宏来解决校准问题。这个问题原则上很简单，但是我不明白什么是行不通的。 我有以下代码

Sub GSeek()
 With Worksheets("Sheet1")
    .Range("H18").GoalSeek _
    Goal:=.Range("H32").Value, _
    ChangingCell:=.Range("G18")
 End With
End Sub

当我运行宏时，我可以看到计算正在进行中，但是最后结果没有显示在“更改单元格”中的屏幕上，但是打印的值是开始的。