Почему не работает непонятно. Другие галки при установке защиты (например, добавление строк/столбцов) ведут себя адекватно.
Сделать можно следущее: поставить защиту с параметром UserInterfaceOnly:=True
Он ставит защиту от действий пользователя, но не от макроса (любого).
Но засада в том, что параметр надо устанавливать каждый раз при открытии книги.
В модуль ЭтаКнига:
Код |
---|
Private Sub Workbook_Open()
Sheets("Акт").Protect Password:="пароль", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingRows:=True, AllowInsertingRows:=True, AllowSorting:=True _
, AllowFiltering:=True, AllowUsingPivotTables:=True, UserInterfaceOnly:=True
End Sub |