VBA 错误“参考无效”中的目标搜索

Question

我对 Excel 的 VBA 中的GoalSeek function 有疑问。

它说“参考无效”，我知道它指的是参考r和c ，因为如果我输入数字，它运行顺利。
但是，如果我拆分代码，我可以看到r =68 和c =7，这是正确的数字。 因此，当引用被放入目标寻找 function 中的Cells引用时，它不起作用并且我收到错误“引用无效”。
我缺少某种Dim或Set吗？

Sub MacroTest1()
    ActiveSheet.Calculate
    
    r = Range("LeverageRatioPeriod").Row
    c = WorksheetFunction.Match(Range("MaxAcquisitionYear"), Range("YearRange"), 0)
    
    Cells(r, c).GoalSeek Goal:=4, ChangingCell:=Range("MaxEV")

Answer 1

请检查单元格 Range("MaxEV") 中输入的内容。 如果那里有公式，请将其替换为简单的值。 就我而言，这解决了一个类似的问题，GoalSeek 最终返回了一个值。