Якщо ви розповсюджували книги Excel із захищеними аркушами, ви, ймовірно, отримаєте книги назад із захищеними аркушами. Часто вам потрібно зняти захист аркушів у книзі, перш ніж продовжити роботу. Якщо ви виявите, що постійно знімаєте захист робочих аркушів, цей макрос може бути просто квитком.
Як працює макрос
Код запускається подією Open у книзі. Коли ви відкриваєте книгу, ця подія запускається, запускаючи код всередині. Цей макрос автоматично знімає захист вказаного аркуша з заданим паролем, коли відкривається робоча книга:
Приватна додаткова робоча книга_Open()
«Крок 1. Захистіть аркуш паролем
Sheets("Sheet1").Скасувати захист пароля:="RED"
Кінець суб
Макрос явно називає аркуш, який потрібно зняти, — у цьому випадку Лист1. Потім він передає пароль, необхідний для зняття захисту аркуша.
Паролі Excel чутливі до регістру, тому зверніть увагу на точний пароль і великі літери, які ви використовуєте.
Як використовувати макрос
Щоб реалізувати цей макрос, вам потрібно скопіювати та вставити його у вікно коду події Workbook_Open. Розміщення макросу тут дозволяє йому запускатися щоразу, коли відкривається книга:
Активуйте редактор Visual Basic, натиснувши Alt+F11.
У вікні проекту знайдіть назву проекту/книги та клацніть знак плюса біля нього, щоб побачити всі аркуші.
Натисніть Цей зошит.
У спадному списку «Подія» виберіть «Відкрити».
Введіть або вставте код у щойно створений модуль, змінивши назву аркуша (за потреби) та пароль.
Введіть свій код у подію Workbook Open.