После открываю новый созданный файл и группировка не работает. Нажимаю кнопку "Скрыть группу" и выдаёт ошибку: "Нельзя использовать данную команду на защищённом листе...."
Тогда все ясно. Дело в том, что данный метод работает только до закрытия книги. Это означает, что код установки защиты необходимо устанавливать каждый раз при открытии книги. Лучше всего поместить код в событие Workbook_Open модуля книги(ЭтаКнига).
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
Добрый день всем! Знатоки, подскажите, пожалуйста, как должен выглядеть код от eeigor, с уже подставленной ссылкой на нужный лист? Например, если лист называется "Тест". Нужно, чтобы при открытии книги можно было на защищенном листе сворачивать-разворачивать группировки.
Private Sub Workbook_Open()
Sheets("Прайс1").Unprotect Password:="1" 'Снимаем защиту листа
Sheets("Прайс1").EnableOutlining = True '
Sheets("Прайс1").Protect Contents:=True, UserInterfaceOnly:=True
Sheets("Прайс2").Unprotect Password:="1" 'Снимаем защиту листа
Sheets("Прайс2").EnableOutlining = True '
Sheets("Прайс2").Protect Contents:=True, UserInterfaceOnly:=True
End Sub
Да, группировки заработают. Но во всех вариантах (в том числе и других), которые я видел, с таких листов пользователь сможет снять защиту листа БЕЗ ВВОДА ПАРОЛЯ. А есть варианты, при которых и кнопки группировок работали бы и при этом 1) при попытке пользователя снять защиту с листа сохранялась необходимость ввода пароля, 2) при открытии книги не нужно было бы вводить пароль защиты листа. ?