Excel vba 公式字符串不计算：#NAME？ 错误

Question

我有一个在 A1 单元格中输入求和公式的子项：

Sub test_string()
    ThisWorkbook.Worksheets("test").Cells(1, 1) = "=СУММ(B1:D1)"
End Sub

起初看起来它已经起作用了，但是当我打开工作表时，有一个#NAME? A1 单元格中的错误：

当我手动计算公式时错误消失（将光标放在公式文本中并单击 Enter）。

为什么会发生这种情况，有没有办法解决？ 我试过

ThisWorkbook.Worksheets("test").Cells(1, 1).Calculate

但没有结果。

Answer 1

您没有指定所需的 Cells 属性。

Cells 的默认属性是 Value。 因此，当你写：

Cells(1,1) = "=SUM(B1:D1)"

......你实际上是在说：

Cells(1,1).Value = "=SUM(B1:D1)"

您需要使用 .Formula 属性：

Cells(1,1).Formula = "=SUM(B1:D1)"