Удалить пустые строки при условии пустой ячейки - VBA
Формулировка задачи:
нужно записать макрос, который будет удалять всю строку при условии, что в ячейке В или С пусто, и так по всему документу.
Данные являются гиперссылками, периодически обновляются.
Решение задачи: «Удалить пустые строки при условии пустой ячейки»
textual
Листинг программы
Public Sub www() On Error Resume Next Sheets("Лист1").Copy after:=Sheets(Sheets.Count) With ActiveSheet .UsedRange.RowHeight = 12.5 Intersect(.UsedRange, .[b:d]).Value = Intersect(.UsedRange, .[b:d]).Value Intersect(.UsedRange, .[b:d]).SpecialCells(2, 1).EntireRow.Delete End With End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д