显示公式的 VBA 宏 (Excel)

Question

我的宏中有一个代码返回我的 单元格(A5) 结果如 #name ?

Range("A5").Select
ActiveCell.FormulaR1C1 = "=Application.Sum(Range(Cells(1, 5), Cells(20, 5)))"
End Sub

#name? 在我的 VB 代码中包含引号之间的文本公式

=Application.Sum(Range(Cells(1, 5), Cells(20, 5)))

如果我不带引号写，它会返回一个 结果 .(范围之和)

ActiveCell.FormulaR1C1 = Application.Sum(Range(Cells(1, 5), Cells(20, 5))) 

但我需要在我的牢房里有 A5 结果和公式，我是如何得到这个结果的。
也许改变一些选项就足够了？

Answer 1

由于要使用 VBA 代码在单元格 A5 中输入公式，因此需要使用正确的参数:
Range(Cells(1, 5), Cells(20, 5))是VBA，如果你想要它作为Excel工作表单元格识别的公式，你需要使用R1C5:R20C5 .

此外，而不是 Application.Sum只需使用 Sum .

你应该尽量避免使用 Select和 ActiveCell并直接使用Range("A5").FormulaR1C1
所以只需使用下面的行代码:

Range("A5").FormulaR1C1 = "=Sum(R1C5:R20C5)"