vba - 尽管公式正确，但在单元格中写入公式会出错

Question

我正在使用 VBA 在 MS Excel 工作表中编写公式。当我手动将公式复制到单元格时，它可以工作，但是当我使用下面的行时，它会给我一个运行时错误:

'1004': Application-defined or object-defined error.

ActiveSheet.Cells(Row + 3, Column + i).Formula = "=SUMPRODUCT(--(OFFSET(endResourceNaam;2;0):OFFSET(endResourceNaam;1000;0)=$A" & Row + 1 & ");--(OFFSET(endResourceNaam;2;4):OFFSET(endResourceNaam;1000;4)=$E" & Row + 1 & ");OFFSET(endResourceWeek;2;" & ColumnLetter(Column - 1) & "$1):OFFSET(endResourceWeek;1000;" & ColumnLetter(Column - 1) & "$1))"

生成的(循环中的第一个)字符串是:

=SUMPRODUCT(--(OFFSET(endResourceNaam;2;0):OFFSET(endResourceNaam;1000;0)=$A6);--(OFFSET(endResourceNaam;2;4):OFFSET(endResourceNaam;1000;4)=$E6);OFFSET(endResourceWeek;2;O$1):OFFSET(endResourceWeek;1000;O$1))

我通过从 VBA 代码打印公式然后将其复制/粘贴到单元格来测试公式。这样我就可以确定生成的字符串实际上是正确的。据我所知，VBA 中内置了某种保护措施，可确保当我尝试编写公式时，公式正确且有效。这种保护中可能有一些东西阻止我将公式写入单元格。

有什么解决方案可以让我使用 VBA 将所需的公式写入单元格？

Answer 1

我敢打赌，因为它是一个数组公式，你应该使用 FormulaArray属性(property)。

ActiveSheet.Cells(Row + 3, Column + i).FormulaArray =