Восстановите защиту листа при сохранении и закрытии

В настоящее время у меня есть код VBA, который автоматически удаляет все листы в моем файле Excel 2016 по имени пользователя. Введите описание изображения здесь

В настоящее время, когда я открываю файл, он запрашивает пароль. Я не хочу, чтобы это запрашивало пароль, я просто хочу, чтобы он защищал ВСЕ страницы, если имя пользователя, открывающего его, совпадает с тем, что будет в коде.

  • Могу ли я искать и заменять макрос Notepad ++?
  • VBA Macro для сортировки и применения условного форматирования к диапазону ячеек с динамическим числом строк
  • Добавить пробел после n-й запятой в Excel, Notepad ++ или emEditor?
  • Как скопировать только гиперссылку (а не текст) в другую ячейку?
  • Как заставить Excel открывать второе пустое окно при открытии файла из проводника?
  • Как добавить кнопку макроса на панель инструментов или ленту в Word?
  • Скажем, я уполномочен вносить изменения в книгу, и я открываю ее, и ВСЕ страницы не защищены. Я вношу некоторые изменения, но хочу автоматически восстановить защиту, которую я настроил на каждом листе, когда я сохраняю внесенные изменения.

    Конечный пользователь, который будет заполнять листы, не имеет доступа к изменению, все открывает файл и всю защиту, которую я установил на месте и активен. В настоящее время я использую этот код, но он не работает.

    Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets("ADD-EXTEND").Protect Password:="SPAR" ActiveWorkbook.Save End Sub 

    PS Этот подканал находится ниже кода, чтобы разблокировать листы в этой книге?

  • Показать данные фильтра столбца Excel в ячейках
  • Как перенести данные в столбцы на строки?
  • Как вводить только уникальные значения в столбце Excel 2007
  • VBA делает ячейки обязательными на основе предыдущей записи ячейки
  • Как предотвратить повреждение общих файлов Excel?
  • Формула Excel для сравнения одного значения в одной ячейке с несколькими значениями в другой ячейке
  • One Solution collect form web for “Восстановите защиту листа при сохранении и закрытии”

    Снимок экрана ниже должен быть достаточно, чтобы вы начали, это довольно понятно:

    excel_protect_worksheet_on_close

    Давайте будем гением компьютера.