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

Вопрос): У меня есть файл, в котором мне нужны только те строки, в которых в столбце B указано «Продукт Б». Я хочу удалить все остальное. Может ли кто-нибудь помочь мне написать макрос? Ниже приведен снимок имеющихся данных:

img1

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

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

img2

===

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

Sub DeleteRow ()

С Sheet1.Cells (1) .CurrentRegion.Columns (2)

EntireRow.Delete End With End Sub

img3

Объяснение кода:

Шаг 1) Приведенный выше код выберет текущий регион из столбца 2, т.е.

Столбец продукта Шаг 2) Применить фильтр

img4

Шаг 3) Видимые ячейки будут удалены вместе со всей строкой. Удалить код.

Остальные данные, то есть где продукт B существует в столбце B, будут нашими выходными данными.

img5

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

image 19