Проблема с производительностью

Я пытаюсь удалить все строки со значениями пробелов. У меня около 15 000 строк и не более 25% пустых. Вот код, который у меня есть.

Columns("A:A").Select 
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete

Однако первая и вторая строки кода работают нормально, когда я пытаюсь добавить третью строку, моя электронная таблица истекает, и у меня остается сообщение (Не отвечает). Я думаю, что моя проблема заключается в количестве строк, которые я пытаюсь удалить сразу, потому что код работает, когда я уменьшаю количество контента. Кто-нибудь может предложить исправить? Почему можноТ Excel справиться с этим?

Ответы на вопрос(2)

Ваш ответ на вопрос