Поиск последней заполненной ячейки в столбце

Описание функции

Функция =ПОСЛЕДНЕЕВСТОЛБЦЕ(ЯЧЕЙКА) имеет один аргумент.

• ЯЧЕЙКА - ссылка на любую ячейку из столбца в котором необходимо найти последнее заполненное значение.

Пример

Поиск последнего значения в столбце.

Код на VBA

Вы можете самостоятельно внедрить код ниже в Вашу книгу или скачать всю надстройку по ссылке ниже.

Public Function ПОСЛЕДНЕЕВСТОЛБЦЕ(ЯЧЕЙКА As Range)
    If ЯЧЕЙКА.Parent.Cells(Sheets(1).Rows.Count, ЯЧЕЙКА.Column) <> "" Then _
            ПОСЛЕДНЕЕВСТОЛБЦЕ = ЯЧЕЙКА.Parent.Cells(Sheets(1).Rows.Count, ЯЧЕЙКА.Column).Value
    If ЯЧЕЙКА.Parent.Cells(Sheets(1).Rows.Count, ЯЧЕЙКА.Column) = "" Then _
            ПОСЛЕДНЕЕВСТОЛБЦЕ = ЯЧЕЙКА.Parent.Cells(Sheets(1).Rows.Count, ЯЧЕЙКА.Column).End(xlUp).Value
End Function