Избегание пустых строк при переносе данных в другую книгу

Всем привет!

Господа, подскажите пожалуйста: есть макрос на VBA, который ищет в присланных отчетах (Excel-файлы с одинаковым макетом) данные и выгружает их в новый файл в общую таблицу.

Проблема следующая: в макете 1000 строк на листе, а нужно переносить только те, в которых есть данные. Подскажите, как лучше сделать проверку на заполненность? Я так понимаю через первую ячейку (т.к. это по факту ID).

Заранее спасибо!

Таблица Excel, в которой нужно удалить пустые строки


Ответы (1 шт):

Автор решения: vikttur

Определение номера строки с последней заполненной ячейкой в первом столбце:

With Worksheets("НашЛист")
        lRw = .Cells(.Rows.Count, 1).End(xlUp).Row
End Woth

Диапазон для обработки брать от первой строки таблицы до строки lRw

→ Ссылка