如何管理不等号的和乘积 VBA

Question

我写了下面的代码。我正在尝试在 vba 中使用 sumproduct 函数，但它不起作用。当我运行我在单元格 Q2 中得到的代码错误 #Value!

 ActiveSheet.Range("Q2").Value = Application.Evaluate("=SUMPRODUCT(--(T9:T10009<>N);I9:I10009;R9:R10009)")

如果我编辑此行，我会收到以下错误：

ActiveSheet.Range("Q2").Value = Application.Evaluate("=SUMPRODUCT(--(T9:T10009<>"N");I9:I10009;R9:R10009)")

compile error: expected: list separator or)

我也试过这个：

 ActiveSheet.Range("Q2").Value = Application.Evaluate("SUMPRODUCT(--(T9:T10009<>"N");I9:I10009;R9:R10009)")

但是和上面一样的错误..

Answer 1

尝试：

ActiveSheet.Range("Q2").Value = Application.Evaluate("=SUMPRODUCT(--(T9:T10009<>" & """N""" & "),(I9:I10009),(R9:R10009))")

How to manage sumproduct with not equal sign in VBA