Удаление строк не содержащих признак

[1i1i]

Люди... спасите )))
Такая ситуация
В экселе есть таблица на нескольких листах. В колонке "В" признак(на нескольких листах "х" а на других "у") строки не содержащие признак либо "х", либо "у" нужно удалить. В идеале запускаться макрос будет от кнопки.


Я так понимаю что чтобы искал по всем листам нужно типо этого
Sub test()
Application.ScreenUpdating = False
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets ' перебираем все листы в книге
sh.Activate ' активируем очередной лист
УдалениеСтрокПоУсловию ' запускаем макрос
Next sh
End Sub

Как написать макрос чтобы удалял строки содержащие признак я представляю а наоборот чтото вообще ничего не получается =(

Если у когото есть уже готовый макрос я поверю в деда мороза =)

[Hugo121]

sh.Activate не нужно. Это даже вредно.
А готовый есть - верьте в Деда Мороза!
Правда он скорее всего не под Ваш файл... Даже уверен что не под Ваш.

[VictorM]

Поиск по форуму Удаление строки по условию
Думаю там найдется то, что Вам нужно.
Так что Деды Морозы это реальность

[The_Prist]

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