vba - Excel VBA - 将变量设置为公式的值

Question

无论如何将VBA中的变量设置为公式的结果/值。
我需要它来计算 VBA 中的结果，而不是单元格中的结果。

Variable1 = "=SUBTOTAL(3,INDIRECT('New Sheet 1'!A3:A4500))"
Variable2 = "=SUMPRODUCT(--ISERR('New Sheet 1'!J3:J4000))"
Variable3 = "=COUNTBLANK('New Sheet 1'!P2:P4000)"

我已经在这里看到了一些使用'-标记的问题。

提前致谢!

Answer 1

使用评估

Variable1 = Application.Evaluate("SUBTOTAL(3,INDIRECT('New Sheet 1'!A3:A4500))")
Variable2 = Application.Evaluate("SUMPRODUCT(--ISERR('New Sheet 1'!J3:J4000))")
Variable3 = Application.Evaluate("COUNTBLANK('New Sheet 1'!P2:P4000)")

或者您可以使用 Evaluate 的简写:

Variable1 = [SUBTOTAL(3,INDIRECT('New Sheet 1'!A3:A4500))]
Variable2 = [SUMPRODUCT(--ISERR('New Sheet 1'!J3:J4000))]
Variable3 = [COUNTBLANK('New Sheet 1'!P2:P4000)]

[]使用这种方式是 Application.Evaluate 的简写并且使用您正在使用的公式，它将起作用。

如果您的公式包含一个带有变量的串联字符串，那么速记方法将不起作用， Application.Evaluate需要用引号拼出