![Код VBA для разблокировки заблокированного листа Excel: 4 шага Код VBA для разблокировки заблокированного листа Excel: 4 шага](https://i.howwhatproduce.com/images/003/image-7379-12-j.webp)
Оглавление:
2025 Автор: John Day | [email protected]. Последнее изменение: 2025-01-23 15:05
![Код VBA для разблокировки заблокированного листа Excel Код VBA для разблокировки заблокированного листа Excel](https://i.howwhatproduce.com/images/003/image-7379-13-j.webp)
![Код VBA для разблокировки заблокированного листа Excel Код VBA для разблокировки заблокированного листа Excel](https://i.howwhatproduce.com/images/003/image-7379-14-j.webp)
Если вы когда-либо забыли пароль для одной из ваших таблиц Excel, вы знаете, насколько это может быть неприятно. Код, использованный в этой инструкции, - один из самых простых, которые я нашел. Он сгенерирует полезный код, который разблокирует ваш защищенный лист. Я не могу поверить в код, так как я просто нашел его в момент необходимости (и я больше не могу найти, где находится сайт) … ооочень я не буду сильно помогать, если он не работает для вас, но у меня добился успеха и подумал, что поделюсь.
Шаг 1. Откройте VBA
![Открыть VBA Открыть VBA](https://i.howwhatproduce.com/images/003/image-7379-15-j.webp)
Откройте рабочий лист, к которому вы забыли пароль. Используйте Alt + F11, чтобы войти в редактор макросов. После того, как в VBA дважды щелкните лист, который нужно разблокировать, из списка меню слева. Это откроет страницу общих объявлений для этого листа.
Шаг 2. Вырежьте и вставьте взломщик кода
![Вырезать и вставить взломщик кода Вырезать и вставить взломщик кода](https://i.howwhatproduce.com/images/003/image-7379-16-j.webp)
Вставьте приведенный ниже код на страницу общих объявлений, которую вы открыли. Вам не нужно ничего менять, имя листа и т. Д. Просто вырежьте и вставьте._ Sub PasswordBreaker () 'Срывает защиту рабочего листа паролем. Dim i As Integer, j As Integer, k как целое число Dim l как целое число, m как целое число, n как целое число Dim i1 как целое, i2 как целое, i3 как целое Dim i4 как целое, i5 как целое, i6 как целое число при ошибке Продолжить Далее Для i = 65 до 66: для от j = 65 до 66: для k = 65 до 66: для l = 65 до 66: для m = 65 до 66: для i1 = 65 до 66 Для i2 = 65 до 66: для i3 = 65 до 66: для i4 = 65 До 66 Для i5 = 65 До 66: Для i6 = 65 До 66: Для n = 32 До 126 ActiveSheet. Unprotect Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Если ActiveSheet. ProtectContents = False, то MsgBox "Один используемый пароль" & Chr (i) & Chr (j) & _ Chr (k) & Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & _ Chr (i3) & Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Выход Sub End If Next: Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next End Sub _
Шаг 3: запустите макрос
![Запустить макрос Запустить макрос](https://i.howwhatproduce.com/images/003/image-7379-17-j.webp)
После добавления кода запустите макрос, выбрав «Выполнить» на панели вкладок меню в верхней части экрана редактора VBA или просто нажав F5.
Шаг 4: используйте сгенерированный код
![Используйте сгенерированный код Используйте сгенерированный код](https://i.howwhatproduce.com/images/003/image-7379-18-j.webp)
![Используйте сгенерированный код Используйте сгенерированный код](https://i.howwhatproduce.com/images/003/image-7379-19-j.webp)
![Используйте сгенерированный код Используйте сгенерированный код](https://i.howwhatproduce.com/images/003/image-7379-20-j.webp)
Макрос вернет вас на рабочий лист, с которого вы хотите снять защиту. Появится окно стиля предупреждения с используемым кодом. На вкладке меню «Обзор» нажмите «Снять защиту с листа», введите сгенерированный код в качестве пароля и готово. Ваш лист должен быть разблокирован! Вы должны использовать эту возможность с умом и ответственно только для разблокировки ваших собственных листов.
Рекомендуемые:
Побег из листа (головоломка Excel): 5 шагов (с изображениями)
![Побег из листа (головоломка Excel): 5 шагов (с изображениями) Побег из листа (головоломка Excel): 5 шагов (с изображениями)](https://i.howwhatproduce.com/images/002/image-4370-7-j.webp)
Escape the Sheet (Excel Puzzle): Escape the Sheet - это небольшая игра в Excel, которую я собрал несколько лет назад, чтобы научить группу коллег более продвинутым навыкам работы с Excel, одновременно немного развлекаясь с викторинами и логическими головоломками, двумя вещами, которые я люблю! игра представляет собой комбинацию excel fo
Репетитор по чтению с листа с Макей Мейки и Скретчем: 3 шага
![Репетитор по чтению с листа с Макей Мейки и Скретчем: 3 шага Репетитор по чтению с листа с Макей Мейки и Скретчем: 3 шага](https://i.howwhatproduce.com/images/006/image-17391-j.webp)
Репетитор по чтению с листа с Макеем Мейки и Скретчем: научиться читать музыку с листа - сложная задача для многих детей, и мой сын был одним из них. Мы пробовали различные методы, найденные в Интернете, чтобы попытаться помочь, но ни один из них не был особенно "забавным"; в его глазах. Также не помогло то, что я не читаю м
Электрический лонгборд для начинающих (0 код) + бонус: 3 шага
![Электрический лонгборд для начинающих (0 код) + бонус: 3 шага Электрический лонгборд для начинающих (0 код) + бонус: 3 шага](https://i.howwhatproduce.com/images/001/image-1242-53-j.webp)
Электрический лонгборд для начинающих (0 кодов) + бонус: я хотел что-то передвигать по городу, но меня не интересовали скутеры, коньки или мотоциклы, поэтому я решил сжать свой мозг и придумал это! сделать его как можно проще, чтобы он не подводил, а также был
Как получить чистый код Gliphy для чатов Mewe: 3 шага
![Как получить чистый код Gliphy для чатов Mewe: 3 шага Как получить чистый код Gliphy для чатов Mewe: 3 шага](https://i.howwhatproduce.com/images/004/image-11953-8-j.webp)
Как получить чистый код Gliphy для чатов Mewe: кратчайшие инструкции! Mewe, альтернатива Facebook, имеет много хороших вещей, но вы можете столкнуться с этой проблемой: Gif, который вы выбрали из Glipphy, будет показан всем остальным на Чат, НО, он не будет отображаться в СОБСТВЕННОМ чате! Решение? Возьми т
Никогда не вводите PIN-код для голосовой почты: 3 шага
![Никогда не вводите PIN-код для голосовой почты: 3 шага Никогда не вводите PIN-код для голосовой почты: 3 шага](https://i.howwhatproduce.com/preview/how-and-what-to-produce/10766511-never-enter-your-pin-for-your-voicemail-3-steps-j.webp)
Никогда не вводите свой PIN-код для голосовой почты: Вы устали от необходимости вводить голосовую почту каждый раз, когда проверяете свою голосовую почту. Что ж, я нашел уловку для этого