KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как автоматически защитить нужный лист в Excel?

АвторСяоянДата изменения

Защита листа позволяет предотвратить изменение его содержимого другими пользователями. Однако иногда вам самим может понадобиться отредактировать защищённый лист. В этом случае сначала необходимо снять защиту, а после внесения изменений — снова её включить. К сожалению, большинство пользователей забывают повторно защитить лист после завершения редактирования. В данной статье я расскажу о нескольких способах автоматического повторного включения защиты для листа.

Автоматическая защита определённого листа с помощью кода VBA

Автоматическая защита определённого листа с помощью Kutools для Excel


Автоматическая защита определённого листа с помощью кода VBA

В Excel отсутствуют прямые средства для автоматической повторной защиты определённого листа, поэтому вы можете создать код VBA для решения этой задачи. После изменения содержимого листа выполните следующие действия:

1. Удерживая нажатыми клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.

2. Затем в левой части окна щёлкните ThisWorkbook в Проводнике проектов, дважды щёлкните по нему, чтобы открыть модуль, и скопируйте приведённый ниже код VBA в пустой модуль:

Код VBA: автоматическая защита определённого листа

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    If MsgBox("Reprotect Sheet Main?", vbYesNoCancel) = vbYes Then
        Sheets("Main").Protect ("123456")
    End If
End Sub

скопируйте и вставьте код VBA в модуль ThisWorkbook

3. Затем сохраните и закройте этот код — появится диалоговое окно с напоминанием о необходимости повторно защитить данный лист (см. скриншот):

появляется окно с напоминанием о необходимости повторной защиты этого конкретного листа

4. Нажмите кнопку Да, чтобы снова защитить лист. Теперь сохраните эту книгу в формате Книга Excel с поддержкой макросов. С этого момента при каждом сохранении или закрытии книги будет появляться вышеуказанное окно с напоминанием об автоматической защите вашего листа.

Примечание: в приведённом выше коде текст Main — это имя листа, который вы хотите повторно защитить, а число 123456 — пароль для вашего защищённого листа. Вы можете изменить их по своему усмотрению.


Автоматическая защита определённого листа с помощью Kutools для Excel

Если у вас установлено расширение Kutools для Excel, вы сможете быстро и легко редактировать защищённый лист с помощью функции Конструктор листов и автоматически повторно включать его защиту — без единой строчки кода VBA!

Kutools для Excelпредлагает более 300 расширенных функций для упрощения сложных задач, повышая креативность и эффективность.Интегрировано с возможностями ИИ, Kutools автоматизирует задачи с высокой точностью, делая управление данными простым и удобным.Подробная информация о Kutools для Excel…         Бесплатная пробная версия…

После установки Kutools для Excelвыполните следующие шаги:

1. Перейдите на защищённый лист и нажмите KUTOOLS PLUS > Конструктор листов. На ленте появится новая вкладка Конструктор (см. скриншоты):

нажмите функцию «Конструктор листов» Kutools
стрелка вниз
на ленте появится новая вкладка «Конструктор»

2. На вкладке Конструктор нажмите параметр Параметры в группе Параметры. В появившемся диалоговом окне Параметры инструмента дизайна установите флажки напротив параметров Разблокировать лист перед открытием инструмента дизайна и Защитить лист перед закрытием инструментов конструктора в разделе Защита, затем введите пароль для защищённого листа в поле Использовать пароль t (см. скриншоты):

нажмите параметр «Параметры»стрелка вправоустановите флажки напротив опций «Снимать защиту с листа перед открытием инструментов конструктора» и «Защищать лист перед закрытием инструментов конструктора»

3. После завершения настройки нажмите кнопку ОК, чтобы закрыть диалоговое окно, а затем выйдите из режима Конструктор листов, нажав Закрыть Конструктор листов, чтобы применить настройки (см. скриншот):

нажмите «Закрыть конструктор листов»

4. Теперь на защищённом листе нажмите KUTOOLS PLUS > Конструктор листов, чтобы снять защиту и внести необходимые изменения. После редактирования нажмите Закрыть Конструктор листов, чтобы снова защитить лист.

Скачайте Kutools для Excel и протестируйте его бесплатно прямо сейчас!


Связанные статьи:

Как одновременно защитить несколько листов в Excel?

Как снять защиту сразу с нескольких листов в Excel?

Как установить пароль для защиты книги?

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек