使用Evaluate with Variants时出现Excel VBA类型不匹配错误

Question

我在VBA excel中遇到类型不匹配错误，代码如下：

M(i, GPARAM(1)) = Evaluate(Func & "(" & EvalVect & "," & GPARAM & ")")

其中，Func是包含函数名的字符串，而EvalVect和GPARAM都是变体。

如果我硬编码表达式，显式指定函数名，它运行时没有问题，所以问题是由于我对evaluate函数的理解，而不是UDF。

M(i, GPARAM(1)) = Func1(EvalVect, GPARAM)

如有任何建议，我们将不胜感激。

干杯

Answer 1

你的GPARAM是一个数组，你试图将它添加到一个字符串中--注意，你需要给出它的索引。

Evaluate(Func & "(" & EvalVect & "," & GPARAM(1) & ")")