Одна из замечательных особенностей Microsoft Excel - это возможность автоматизировать полезные функции. Когда бизнес-таблица содержит сотни или даже тысячи строк, вам может быть сложно перемещаться по ее ячейкам. Устраните эту проблему, создав собственную функцию поиска. Используя несколько строк кода, вы можете создать подпрограмму VBA, которая находит последнюю строку в электронной таблице и переходит к ней автоматически.
1
Запустите Excel и откройте электронную таблицу, содержащую несколько столбцов.
2
Нажмите «Alt-F11», чтобы открыть редактор «Visual Basic», и нажмите «Вставить | Модуль ». VBA добавляет новый модуль в окно проекта.
3
Вставьте следующий код в окно редактирования, которое появляется справа от окна проекта:
Sub SelectLastRow () Dim finalRow как целое число
finalRow = ActiveSheet.UsedRange.Rows.Count
Если finalRow = 0 Тогда finalRow = 1 Конец Если
Строки (finalRow). Выберите End Sub
Этот Sub определяет последнюю строку таблицы, исследуя свойство Count коллекции строк. Затем Sub сохраняет это значение в переменной finalRow. Последний оператор Sub передает значение finalRow методу VBA Select.
4
Нажмите «F5», чтобы запустить Sub. Метод Select находит последнюю строку таблицы, переходит к этой строке и выделяет ее.
