работа с группировкой строк/столбцов на защищенном листе
NeWru
Дата: Вторник, 29.08.2017, 19:21 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 63
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Здравствуйте! Прошу подсказку, как на защищенном листе оставить возможность работы с показом/скрытием сгруппированных столбцов или строк. В таблице ячейки без защиты и могут редактироваться, но иногда требуется для печати скрывать строки или столбцы, которые сгруппированы. Не могу подобрать условия для их скрытия при включенной защите листа, при выключенной конечно все работает.
Здравствуйте! Прошу подсказку, как на защищенном листе оставить возможность работы с показом/скрытием сгруппированных столбцов или строк. В таблице ячейки без защиты и могут редактироваться, но иногда требуется для печати скрывать строки или столбцы, которые сгруппированы. Не могу подобрать условия для их скрытия при включенной защите листа, при выключенной конечно все работает. NeWru
Ответить
Сообщение Здравствуйте! Прошу подсказку, как на защищенном листе оставить возможность работы с показом/скрытием сгруппированных столбцов или строк. В таблице ячейки без защиты и могут редактироваться, но иногда требуется для печати скрывать строки или столбцы, которые сгруппированы. Не могу подобрать условия для их скрытия при включенной защите листа, при выключенной конечно все работает. Автор - NeWru Дата добавления - 29.08.2017 в 19:21
buchlotnik
Дата: Вторник, 29.08.2017, 19:33 |
Сообщение № 2
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация:
929
±
Замечаний:
20% ±
2010, 2013, 2016 RUS / ENG
NeWru , разве что программно : [vba]Код
Private Sub Workbook_Open() Sheets("Лист1").EnableOutlining = True Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True End Sub
[/vba]
NeWru , разве что программно : [vba]Код
Private Sub Workbook_Open() Sheets("Лист1").EnableOutlining = True Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True End Sub
[/vba]buchlotnik
Ответить
Сообщение NeWru , разве что программно : [vba]Код
Private Sub Workbook_Open() Sheets("Лист1").EnableOutlining = True Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True End Sub
[/vba]Автор - buchlotnik Дата добавления - 29.08.2017 в 19:33
NeWru
Дата: Вторник, 29.08.2017, 19:44 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 63
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Работает, думаю подойдет! Спасибо Вам! Если кроме кода вариантов нет, то так и сделаю!
Работает, думаю подойдет! Спасибо Вам! Если кроме кода вариантов нет, то так и сделаю! NeWru
Ответить
Сообщение Работает, думаю подойдет! Спасибо Вам! Если кроме кода вариантов нет, то так и сделаю! Автор - NeWru Дата добавления - 29.08.2017 в 19:44
finiamino
Дата: Пятница, 04.03.2022, 18:49 |
Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация:
0
±
Замечаний:
0% ±
Доброго дня. А как сделать чтобы работало на все листы в книге?
Доброго дня. А как сделать чтобы работало на все листы в книге? finiamino
Ответить
Сообщение Доброго дня. А как сделать чтобы работало на все листы в книге? Автор - finiamino Дата добавления - 04.03.2022 в 18:49
Serge_007
Дата: Пятница, 04.03.2022, 22:49 |
Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Пропишите все листы в коде:[vba]Код
Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True Sheets("Лист2").Protect Password:="54321", UserInterfaceOnly:=True Sheets("Лист3").Protect Password:="*****", UserInterfaceOnly:=True
[/vba]
Пропишите все листы в коде:[vba]Код
Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True Sheets("Лист2").Protect Password:="54321", UserInterfaceOnly:=True Sheets("Лист3").Protect Password:="*****", UserInterfaceOnly:=True
[/vba] Serge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Пропишите все листы в коде:[vba]Код
Sheets("Лист1").Protect Password:="12345", UserInterfaceOnly:=True Sheets("Лист2").Protect Password:="54321", UserInterfaceOnly:=True Sheets("Лист3").Protect Password:="*****", UserInterfaceOnly:=True
[/vba] Автор - Serge_007 Дата добавления - 04.03.2022 в 22:49