Как удалить пустые строки в Excel

Удаляем пустые строки в Excel с помощью VBA-скрипта

· 1 минута на чтение

В файл Excel какими-то манипуляциями было добавлено более миллиона строк.

Для удаления лишних будем использовать VBA-скрипт. В Excel на вкладке Разработчик нажимаем кнопку Visual Basic.

Заходим в редактор VBA

В открывшемся редакторе в главном меню переходим в Insert -> Module и вставляем следующий код.

Sub УдалениеПустыхСтрок()
For Each Sht In ActiveWorkbook.Worksheets
Sht.UsedRange
Next Sht
End Sub
Добавляем скрипт

Возвращаемся в excel-файл и на вкладке Разработчик нажимаем кнопку Макросы и выбираем созданный макрос.

Список макросов

После выполнения макроса пустые строки должны удалиться.

Если строки не удалились, то проверить настройки макросов, перейдя на вкладке Разработчик в Безопасность макросов.

Настройки макросов

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

Перезапустить макрос.

Related Articles

Как перенести систему на другой диск?
· 2 минуты на чтение
Не работает панель закладок в Mozilla Firefox
· 1 минута на чтение
BSOD 0x0000006B при запуске Windows 7
· 1 минута на чтение
Как снять защиту с листа Excel?
· 1 минута на чтение