Ошибка #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.