VBA将SUMIFS放入单元中

问题描述

我写了一些代码，根据工作表名称将SUMIF放入单元格中。 newFileName和oldFileName被声明为用作工作表名称的变量。

Sheets(newFileName).Select
Range("C2").Formula = WorksheetFunction.SumIfs(Sheets(oldFileName).Range("$G:$G"),Sheets(oldFileName).Range("F:F"),Range("B2"))

这行得通！

但是，我想将SUMIFS公式放在单元格C2中

Sheets(newFileName).Select
Range("C2").Formula = "=SumIfs(Sheets(oldFileName).Range("$G:G"),Range("B2"))"

这会产生一个编译错误。有什么想法使它起作用吗？

解决方法

您需要使用公式语法编写公式，这意味着工作表名称之前和之后的'和范围之前的!。更重要的是，公式只是String，因此在构造公式时，您不应使用Sheets或Range调用：

Sheets(newFileName).Range("C2").Formula = "=SumIfs('" & oldFileName & "'!G:G,'" & oldFileName & "'!F:F,B2)"