通过VBA设置单元格公式时出现#NAME错误。

Question

我正在编写一个宏，要求我获取具有未知行数的列中的值的平均值。我用它来获取最后一行的数字：

Dim lastRow As Long
lastRow = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row

有效。什么是行不通的是当我尝试在这里使用它时：

Range("B2").Select
ActiveCell.FormulaR1C1 = "=AVERAGE('table1'!AM2:AM" & lastRow & ")"

这样做，我得到#NAME?的结果。我该如何解决这个问题？

Answer 1

将ActiveCell.FormulaR1C1更改为ActiveCell.Formula，因为您使用的是基本的A1表示法，而不是R1C1。