Если вам нужен способ удалить все похожие номера строк сразу, тогда эта статья для вас.

В этой статье мы узнаем, как с помощью макросов избавиться от одной и той же строки на нескольких листах.

===

Вопрос): я хочу удалить одну и ту же строку на нескольких листах, используя код VBA. Мне нужен код для удаления всех строк в книге независимо от того, сколько листов присутствует в текущем файле; Я хочу удалить выбранный номер строки со всех 5 листов.

Прежде всего, давайте введем одинаковые данные во все рабочие листы в одном месте

image 1

Нам нужно выполнить следующие шаги:

Щелкните вкладку «Разработчик». В группе «Код» выберите Visual Basic

image 2

Введите в стандартный модуль следующий код: —

Sub DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Array («Sheet1», «Sheet2», «Sheet3», «Sheet4», «Sheet5»)

xx = Selection.Row

Для i = LBound (shtArr) To UBound (shtArr)

Листы (shtArr (i)). Rows (xx) .EntireRow.Delete

Далее i

End Sub

===

image 3

  • Теперь поместите курсор в любую ячейку A1 и на Sheet1.

Нажмите ALT + F8 *, чтобы запустить макрос; вы обнаружите, что выбранный номер строки удаляется на всех листах.

  • На следующем снимке показаны данные листов 1 и 2 в качестве примера; когда вы выполните это упражнение, вы найдете аналогичное решение на всех соответствующих листах.