Как найти последнюю запись в таблице?

[dsapa]

Здравствуйте!
Мне нужно макросом пробежаться по всей таблице сверху вниз.
Таблица не постоянна. Она периодически пополняется новыми записями.
Пустых строчек внутри таблицы нет.
Как сделать так, чтобы макрос пробежался до последней строчки таблицы включительно? строчка кода, включающая ...(xlsLast), найденная в интернете, не работает.
Спасибо.

[EducatedFool]

Код Range("A" & Rows.Count).End(xlUp) возвратит Вам последнюю заполненную ячейку в столбце А

Соответственно, Range("A" & Rows.Count).End(xlUp).Row - номер строки последней заполненной ячейки в этом столбце

Пример:

Sub test()
    Dim cell As Range, ra As Range: Application.ScreenUpdating = False
    Set ra = Range([A1], Range("A" & Rows.Count).End(xlUp))
    For Each cell In ra.Cells
        MsgBox cell.Address    ' перебираем все ячейки, начиная с А1,
        ' и заканчивая последней заполненной в столбце А
    Next cell
End Sub

[dsapa]

Спасибо огромное!