excel - VBA - 使用变量寻找目标，而不是使用 excel 单元格。引发“无效的限定符”错误

Question

我的代码在下面，简单的目标搜索但仅使用变量，不想使用 excel 单元格。目标搜索函数抛出错误“无效的限定符”。我不知道为什么。请帮忙？

Public Sub GoalSeekUsingArray()
      Dim a                   As Double
      Dim b                   As Double
      Dim c                   As Double
      Dim TotalCalculated     As Double
      Dim TotalDesired        As Integer

      a = 100
      b = -30
      c = -10
      TotalCalculated = a + b + c               '<<<<Initially... TotalCalculated = 60, as you can see.
      TotalDesired = 55                         '<<<<Goal-Seek should produce a=95 because 95 - 30 - 10 = 55 as desired goal.

      TotalCalculated.GoalSeek Goal:=TotalDesired, ChangingCell:=a   '<<<This throws the error.

      Debug.Print a

End Sub

标签： excelvba