Удалить всю строку, если определенная ячейка пустая - VBA

Узнай цену своей работы

Формулировка задачи:

Добрый день! Нужен макрос, который будет удалять всю строку, если ячейка в столбце "А" пустая.

Решение задачи: «Удалить всю строку, если определенная ячейка пустая»

textual
Листинг программы
Dim r As Long, rn As Range
Set rn = Intersect(ActiveSheet.UsedRange, [a:a])
For r = rn(rn.Count).Row To rn(1).Row Step -1
  If Cells(r, 1) = Empty Then rows(r).Delete
Next

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 3.667 из 5
Похожие ответы