连接文本，替换引用，并评估为公式

Question

我使用CONCATENATE将公式串在一起，这会产生一个看起来像这样的文本：

=-10*IF((x-10)^3<0,0,(x-10)^3)-20*IF((x-2)^3<0,0,(x-2)^3)

现在，我需要用单元格引用（A1，A2，A3等）替换“x”。之后，我希望将文本作为公式进行评估。

我尝试过使用某种效果：

=Eval(SUBSTITUTE(CONCATENATE(B1,C1,D1),"x",A1))

Eval是一个宏：

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

但是，我收到了#VALUE错误。我尝试过很多不同的方法，这是我最接近的方式。

我是否完全错了，或者我走在正确的轨道上？