vba - 使用公式作为字符串

Question

在一个单元格中，我必须根据某些情况使用几种不同的公式。我在另一张名为 Static 的工作表中，针对所有情况在 TEXT 中编写了一个公式矩阵。我的矩阵在行中有 Criteria1 在列中有 Criteria2 所以使用 INDEX/MATCH 我将获得每个场景 Criteria1/Criteria2 的文本公式。

现在我想在文本中评估这个公式。我在 VBA 中做了一个自定义函数

Function Evalue(ByVal str As String)
Application.Volatile
Evalue = Evaluate(str)
End Function

当函数像SUM CONCATENATE等一样在一个块中时它可以工作......但在函数+ - 的操作时不起作用

Answer 1

您的 UDF 对我有用........在 A1 中输入文本字符串：

总和（B2:B5）+总和（C4:C9）

在另一个单元格中：

=Evalue(A1) 显示正确的值。