Страницы: 1
RSS
Скрыть строчки по условию
 

В ячейке есть выпадающий список
На самой странице я прописал макрос

Код
Private Sub Worksheet_Change(ByVal Target As Range)     If Cells(6, 5).Text = test1 Then
         Rows("22:24").Hidden = True
     Else
       
         Rows("22:24").Hidden = False
     End If
End Sub


Но как то он работает некорректно, он скрывает, а вот дальше не хочет показывать скрытые строчки

 
Скопировать в новую книгу, теперь вообще не работает :-(
 
Код
....= "test"
 
Catboyun, спасибо
Страницы: 1
Наверх