Как защитить все листы книги Excel
Стандартные инструменты Excel позволяют установить защиту листов по одному. А вот чтобы установить защиту сразу на 3, 5, 10 или все листы не обойтись без макросов.
Защита листов
В данной статье речь пойдет о том, как быстро защитить сразу группу листов Excel, так как стандартные инструменты позволяют устанавливать защиту только по одному листу. Особенно эта тема актуальна, когда необходимо установить защиту на книгу, содержащую 5 или более листов.
Реализовать массовую защиту листов поможет диспетчер листов — который входит в состав надстройки VBA-Excel. Для этого:
- Перейдите на вкладку VBA-Excel
- Откройте меню Диспетчеры и выберите Диспетчер листов

- Выберите листы, на которые хотите установить пароль. Выбрать листы можно кликнув мышкой по названию листа. (Также доступен выбор всех листов, только видимых, скрытых и много другое). Далее нажмите кнопку Защита

- Откроется диалоговое окно Защита листов книги. Вы можете выбрать различный уровень защиты. Можно запретить форматирование, ввод данных, сортировку и многое другое.

Вы можете разрешить пользователям файла следующие действия:- выделение заблокированных ячеек
- выделение незаблокированных ячеек
- форматирование ячеек
- форматирование строк/столбцов
- вставку/удаление строк/столбцов
- сортировку
- использование фильтра
- изменение графических объектов
- создание сводных таблиц
- изменение сценариев
- После выбора уровня защиты осталось указать Пароль и нажать кнопку Защитить.
Снятие защиты с листов
Снятие защиты с выбранных листов происходит аналогичным образом:
- Выполните первые три пункта из инструкции выше.
- В диалоговом окне Защита листов книги введите Пароль и нажмите кнопку Снять защиту.

Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.
Как снять защиту листа в Excel 2003, 2007, 2010? Снятие защиты со всех листов Excel
В случае, если пароль для снятия защиты листа не известен (забыт либо утрачен по другой причине), снять защиту листа Excel можно при помощи надстройки (макроса), если же пароль известен, то защита снимается стандартными средствами Excel. Рассмотрим подробнее способы снятия защиты листа в Excel.
Внимание! Перед тем как приступить к снятию защиты листа Excel, убедитесь, что на вкладке «Правка» в поле «Разрешить изменять файл нескольким пользователям одновременно» снят флажок. Если этот флажок установлен, то кнопки «Защитить лист», «Защитить книгу», «Снять защиту листа», «Снять защиту книги» будут неактивными! Для того, чтобы проверить установлен ли этот флажок необходимо зайти в пункт меню Сервис/Доступ к книге. (если работа ведется в Excel 2003) либо на вкладку «Рецензирование», в группе «Изменения» нажать кнопку «Доступ к книге» (если работа ведется в Excel 2007 или Excel 2010).
Как снять защиту листа в Excel 2003?
Для того чтобы снять защиту листа в Excel 2003 необходимо выбрать пункт меню Сервис/Защита/Снять защиту листа.

Если при установке защиты листа использовался пароль, то при снятии защиты появится диалоговое окно «Снять защиту листа», предусматривающее ввод пароля для отключения защиты листа. В случае, если пароль введен правильно, защита листа будет снята.
Как снять защиту листа в Excel 2007?
Снятие защиты листа Excel 2007 производится на вкладке «Рецензирование» нажатием кнопки «Снять защиту листа».

При снятии защиты листа в Excel может появиться диалоговое окно, предусматривающее ввод пароля. Если Вы его знаете, то все хорошо, вводите его и защита снимается.
Как снять защиту листа в Excel 2010?
Снять защиту листа Excel в этой версии приложения можно аналогично тому, как это делалось в Excel предыдущей версии. Заходим на вкладку «Рецензирование» и в группе «Изменения» нажимаем кнопку «Снять защиту листа».

При необходимости вводим пароль.
Как снимать защиту всех листов Excel?
Снятие защиты листов может быть утомительным занятием и занимать много времени, если в рабочей книге много защищенных рабочих листов и часто требуется снимать защиту, а затем устанавливать ее заново. Стандартной возможности, позволяющей снимать и устанавливать защиту сразу на все листы рабочей книги в Excel нет. Реализовать такую возможность можно при помощи VBA — встроенного в приложения Microsoft Office языка программирования. Если защита снимается и устанавливается достаточно часто, а рабочие книги, содержат несколько листов, то автоматизировать операцию можно при помощи надстроек для Excel, при этом программа (макрос) пройдет по всем листам рабочей книги и снимет защиту от изменений.
Быстрое снятие защиты со всех листов сразу, либо выборочное снятие защиты только с тех листов рабочей книги, которые указаны пользователем, в случае, когда все пароли известны пользователю можно осуществить при помощи надстройки, диалоговое окно которой показано ниже.

При помощи кнопки обзора необходимо указать путь к рабочей книге, в столбце «А» которой прописаны имена листов, а в столбце «В» пароли для снятия защиты листов.
Другие материалы по теме:
- Как удалить все листы в Excel кроме активного? Как удалить каждый второй лист в Excel? Выборочное удаление листов
- Как отсортировать листы в Excel? Сортировка листов в Excel по возрастанию и убыванию
- Как скрыть и отобразить скрытые листы в Excel 2007/2010/2013/2016?
- Как вставить в книгу Excel новые листы? Как сделать копии листа в Excel? Как добавить новые листы с заданными именами?
- Как защитить лист в Excel паролем? Защита всех листов разными паролями
покупка
Предположим, у вас есть книга, содержащая несколько листов, и теперь вам нужно защитить все рабочие листы или некоторые конкретные рабочие листы, обычно в 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 дней. Загрузите и бесплатную пробную версию прямо сейчас!
Связанная статья:
Как снять защиту со всех листов excel одновременно
Argument ‘Topic id’ is null or empty
Сейчас на форуме
© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru
Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.
| ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949 |
ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071 |