Eval中的Excel Eval

Question

我在VBA中使用自定义评估功能。但是，评估包含另一个eval（）的公式会失败：

=Eval(I21)

Cell I21 :(公式本身有效）注意：INDIRECT（）也不起作用

'=MATCH("SOME TEXT",eval($I$22),0)

Cell I22 :(位置参考）

''1516Activity'!$C:$C

VBA：

Function Eval(Ref As String)
    Application.Volatile
    Eval = Application.ThisCell.Parent.Evaluate(Ref)
End Function

Answer 1

VBA：

Eval = Application.Evaluate(Ref) 

此解决方案仅在单元格引用使用完全限定范围地址时有效。如果你的引用取决于调用者（涉及row（）+ - 和column（）+ - ），那么你和我的情况相同，没有解决方案。