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

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


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

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

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