Удалить всю строку, если определенная ячейка пустая - 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