vba - 通过 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。