简单VBA目标搜索脚本中的各种错误

Question

我不断收到各种错误，目前是

  

编译错误：语法错误

但是我一直在改变它，它似乎永远不会起作用。代码很简单，我只是看不出它为什么不能工作！

这是我的代码：

Sub Macro1()
Worksheets("Sheet1").Range(Cells(1,2),(8,2)).GoalSeek _
    Goal:=15, _
    ChangingCell:=Worksheets("Sheet1").Range(Cells(1,1),(8,1))
End Sub

它只是通过在另一列上使用目标搜索来更改一列数据。