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 最終返回了一個值。