Ошибка #NAME при настройке формулы ячейки через VBA.

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.