Макрос, скрывающий строки при наличии определенного символа

Пользователь

Сообщений: 21 Регистрация: 27.10.2014

22.04.2015 13:32:33

Добрый день! Заранее прошу прощения, задача элементарная, но для меня это очень тяжело.
Помогите написать макрос, который бы проверял столбец (например B) если в этом столбце встречается символ "x" или любой другой скрыть всю эту строку.

Юрий М Модератор Сообщений: 61036 Регистрация: 14.09.2012 Контакты см. в профиле	#2 22.04.2015 13:56:16 Так тем на форуме - море. Наберите в поисковике по сайту - скрыть строки по условию.

Пользователь

Сообщений: 5194 Регистрация: 22.12.2012

22.04.2015 13:59:11

Код
For i=Cells(Rows.Count,2).End(xlUp).Row To 1 Step -1 if Cells(i,2)<>"" Then Rows(i).EntireRow.Hidden = True next

Изменено: V - 22.04.2015 14:03:18 (запамятовал про шаг :))

Юрий М Модератор Сообщений: 61036 Регистрация: 14.09.2012 Контакты см. в профиле	#4 14.09.2016 15:38:39 Раз уж дали сюда ссылку - для скрытия (не удаления строк) обратный перебор (Step -1) не нужен. Можно сверху вниз.