Последняя заполненная ячейка в Excel

[swetik1981]

Можно ли как-то программно в Excel сразу получить адрес последней заполненной ячейки в столбце (без пошагового просмотра содержимого всех ячеек в этом столбце).

[Pavel55]

Можно

Последний заполненный ряд в столбце А

Код: Выделить всё

iLastRow = Cells(Rows.Count, 1).End(xlUp).Row

Если же вам нужен именно адрес, то можно так

Код: Выделить всё

MsgBox Cells(Rows.Count, 1).End(xlUp).Address(0, 0)

P.S. Так ради общего развития

Код: Выделить всё

'для определения последней строки в столбце A
iLastRow& = Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row
iLastRow& = Range("A65536").End(xlUp).Row
iLastRow& = Cells(65536, 1).End(xlUp).Row
iLastRow& = Cells(65536, ActiveCell.Column).End(xlUp).Row
iLastRow& = Cells(65536, "A").End(xlUp).Row
MsgBox iLastRow&