Доброго дня суток!
Помогите пожалуйста с кодом макроса:
1.Нужно добавить проверку по ячейкам "V15:V19" , при открытии книги или смены условия 0 (стала 1) должен развернуть строки сам.
2.Добавить печать по заданным ячейкам (области печати).
Все это будет на одной кнопке.
сам код:
Помогите пожалуйста с кодом макроса:
1.Нужно добавить проверку по ячейкам "V15:V19" , при открытии книги или смены условия 0 (стала 1) должен развернуть строки сам.
2.Добавить печать по заданным ячейкам (области печати).
Все это будет на одной кнопке.
сам код:
Код |
---|
Sub ToggleHideRows() Dim c As Range For Each c In Range("V15:V19") If Not IsEmpty(c) And c.Value = 0 Then c.EntireRow.Hidden = Not c.EntireRow.Hidden End If Next End Sub |