Как защитить все листы сразу excel

Как защитить все листы книги Excel

Стандартные инструменты Excel позволяют установить защиту листов по одному. А вот чтобы установить защиту сразу на 3, 5, 10 или все листы не обойтись без макросов.

Защита листов

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

Реализовать массовую защиту листов поможет диспетчер листов — который входит в состав надстройки VBA-Excel. Для этого:

1. Перейдите на вкладку VBA-Excel
2. Откройте меню Диспетчеры и выберите Диспетчер листов
   
3. Выберите листы, на которые хотите установить пароль. Выбрать листы можно кликнув мышкой по названию листа. (Также доступен выбор всех листов, только видимых, скрытых и много другое). Далее нажмите кнопку Защита
   
4. Откроется диалоговое окно Защита листов книги. Вы можете выбрать различный уровень защиты. Можно запретить форматирование, ввод данных, сортировку и многое другое.
   
   Вы можете разрешить пользователям файла следующие действия:
   • выделение заблокированных ячеек
   • выделение незаблокированных ячеек
   • форматирование ячеек
   • форматирование строк/столбцов
   • вставку/удаление строк/столбцов
   • сортировку
   • использование фильтра
   • изменение графических объектов
   • создание сводных таблиц
   • изменение сценариев
5. После выбора уровня защиты осталось указать Пароль и нажать кнопку Защитить.

Снятие защиты с листов

Снятие защиты с выбранных листов происходит аналогичным образом:

1. Выполните первые три пункта из инструкции выше.
2. В диалоговом окне Защита листов книги введите Пароль и нажмите кнопку Снять защиту.

Надстройка
VBA-Excel

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

Protect multiple sheets at once.

Sheets › 15. Protect multiple sheets at once.

This utility allows you to protect the selected or all sheets in your workbook with the same password at once.

The built in method of Excel allows you to only protect one sheet at a time. If you want to protect multiple sheets in Excel you have to protect them one by one. This can take a long time if you have many sheets and might result in accidentally forgetting one.
With this tool protecting your sheets is much easier and furthermore a lot faster.

Depending on your Excel version you can set additional settings, just like in the normal Excel protection dialog.

Screenshots

Example screenshot: Protect multiple sheets at once

Practical tricks on how this can help you

Starting this tool

• Click ASAP Utilities › Sheets › 15. Protect multiple sheets at once.
• Specify a Keyboard Shortcut: ASAP Utilities › Favorites & Shortcut keys › Edit your favorite tools and shortcut keys.

Как защитить все листы сразу excel

Argument ‘Topic id’ is null or empty

Сейчас на форуме

© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru

Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.

ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949

ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071

покупка

Предположим, у вас есть книга, содержащая несколько листов, и теперь вам нужно защитить все рабочие листы или некоторые конкретные рабочие листы, обычно в Excel вы можете защищать лист только один за другим с помощью функции Защитить лист, но этот метод утомителен и требует много времени, если необходимо защитить большое количество листов. Как быстро и легко защитить сразу несколько листов в Excel?

Защитите все листы сразу с помощью кода VBA

С помощью следующего кода VBA вы можете защитить сразу все листы активной книги одним и тем же паролем, сделайте следующее:

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

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: защитить все листы в книге сразу:

Sub protect_all_sheets() top: pass = InputBox("password?") repass = InputBox("Verify Password") If Not (pass = repass) Then MsgBox "you made a boo boo" Goto top End If For i = 1 To Worksheets.Count If Worksheets(i).ProtectContents = True Then Goto oops Next For Each s In ActiveWorkbook.Worksheets s.Protect Password:=pass Next Exit Sub oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro." End Sub

3, Затем нажмите F5 ключ для запуска кода и введите пароль для защищенных листов в поле подсказки, см. снимок экрана:

4. Нажмите OK, а затем введите пароль еще раз, чтобы подтвердить пароль.

5. Затем нажмите OK, и все листы были защищены одним паролем.

Защитите несколько листов одновременно с помощью Kutools for Excel

Иногда вы не хотите защищать все листы в своей книге, а хотите защитить только некоторые конкретные листы, в этой ситуации приведенный выше код не будет работать. Но с Kutools for ExcelАвтора Защитить лист утилита, вы можете быстро и легко защитить как все листы, так и отдельные листы.

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

1. Нажмите Кутулс Плюс > Защитить лист, см. снимок экрана:

2. В Защитить лист В диалоговом окне выберите листы, которые нужно защитить. (По умолчанию проверяются все листы в текущей книге.) См. Снимок экрана:

3, И нажмите OK, а затем введите и подтвердите пароль в диалоговом окне «Защита рабочего листа». Смотрите скриншот:

4. Затем нажмите OK, выбранные листы защищены.

Снять защиту сразу с нескольких листов с помощью kutools for Excel

Как вы могли снять защиту с нескольких защищенных листов в книге одновременно? Конечно, Kutools for Excel также предоставляет Снять защиту листа утилита, позволяющая сразу же снять с них защиту.

Пожалуйста, сделайте следующие шаги:

1. Откройте книгу, содержащую защищенные листы.

2. Затем нажмите Кутулс Плюс > Снять защиту листа, см. снимок экрана:

3. В Снять защиту листа диалоговое окно, защищенные листы заносятся в список, затем щелкните Ok кнопку, см. снимок экрана:

4. А потом Снять защиту листа диалоговое окно появляется, чтобы напомнить вам ввести пароль, который вы создали для защиты рабочих листов, см. снимок экрана:

5. После ввода пароля нажмите Ok, все отмеченные листы в списке не защищены.

Примечание: Рабочие листы должны иметь одинаковый пароль.

Демо: защитите или снимите защиту со всех листов одновременно с помощью Kutools for Excel

Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Загрузите и бесплатную пробную версию прямо сейчас!

Связанная статья: