第一个VBA代码：目标寻求运行时间错误1004

Question

我是VBA的第一次使用者。我正在尝试编写代码，以便我不必手动执行500次目标搜索功能。这就是我现在所拥有的：

Sub Atkinson2002()
Dim nrow As Integer
nrow = 8
Do While Not IsEmpty(Range("C" & nrow))
'Complete Goal Seek
Range("I" & nrow).GoalSeek Goal:=0, ChangingCell:=Range("C" & nrow)
nrow = nrow + 1
Loop
End Sub

目标搜寻行中出现错误。消息显示＆＃34;运行时错误＆＃39; 1004＆＃39;：参考无效＆＃34;。我试图阅读一堆已发布的问题，而我似乎无法弄清楚哪些内容未被正确引用。

C列是估计温度

第I列是具有公式= abs（C＃-H＃）的单元格;其中一个数是C列的估计温度，另一个是来自H列的输入实验温度

有什么建议吗？