Снять пароль vba word

Instructions

1. Upload your Office document
2. Confirm the download of the new document
3. Open the downloaded document and press ALT + F11.
   Confirm all error messages that might appear.
4. In the Macro editor window,
   do not expand the project,
   go to «Tools > VBA Project Properties» instead.
5. On the «Protection» Tab,
   set a password of your choice
   and leave the checkbox selected.
6. Save the document and close your office application entirely.
7. Open the saved document and use ALT + F11 again to open the code editor.
8. In the Macro editor window,
   do not expand the project,
   go to «Tools > VBA Project Properties» instead.
9. On the «Protection» Tab,
   clear the checkbox and password fields.
10. Save the document again.
11. The password is now removed and you can view
    or change the code as if it was never protected.

Copyright © 2016 by Kevin Gut |
View source code |
More services

Reset VBA Password is the password recovery utility for password protected VBA Modules in MS Office® documents (Excel, Word, Power Point, Project).

VBA projects are widely used in applications within the MS Office family
and in other applications that use VBA macros.
These scripting programs allow automating the majority of routine
office tasks and make the office a better place.

To ensure the integrity of the original VBA code and to protect
data used by that code, you can password-protect your VBA projects
and macros from viewing and modifying.
This way you can ensure that only the authorized people can modify
with the code, and thus all applications using that VBA macro function
properly.

Reset VBA Password is the program that gives you peace
of mind that you will never be locked out from your own programs.
Even after years,
code protected by the long forgotten password will be available.

Download ‘Reset VBA Password’:

• Setup Program (exe)

• Zipped File Distribution (zip)

Парольная блокировка в Microsoft Word

Парольная блокировка в Microsoft Word – это стойкая защита от публичного доступа к данным («Пароль на Открытие») и простая защита от непреднамеренных
изменений (вся остальная парольная защита).

1. Защита от публичного доступа к данным (стойкая защита):
   • Пароль на Открытие
2. Защита от непреднамеренных изменений (слабая защита):
   • Пароль записи изменений
   • Пароль Ограничения Редактирования
   • Пароль защиты VBA макросов

Использование «Пароля на Открытие» означает шифрование всех данных Word документа, а разблокировать зашифрованный файл без пароля невозможно. Поиск такого пароля
(по другому восстановление, а по факту подбор, перебор вариантов) требует времени, которое зависит от версии формата Word и сложности установленного пароля.

Использование любых других паролей не шифрует данные. Оно лишь блокирует отдельные действия с ними. Word файл по прежнему можно открыть, а с данными можно работать
в ограниченном режиме. Пароль потребуется только для записи (или применения) изменений. Особенности такой защиты – разблокировать её можно моментально для любой версии Word.

Парольная защита в Word применяется для контроля доступа к информации и является полезной возможностью с первых версий пакета Office. Но время течёт и случается, что пароли
становятся не нужны, их нужно снять.

Надо – значит надо! Давайте научимся разблокировать Word файл и удалим ненужные пароли.

• Как разблокировать Word файл с известным паролем
• Как разблокировать Word файл с забытым паролем

Как разблокировать Word файл с известным паролем

Если с паролем всё в порядке и он известен, то нет проблем. В этом случае разблокировка Word – то же, что блокировка, но в обратном порядке: вводите пароль, стираете его и
сохраняете файл уже без пароля.

Смотрите, как это работает, на примере Microsoft Word 2016.

• Пароль на Открытие
• Пароль Записи Изменений
• Пароль Ограничения Редактирования Word
• Пароль защиты VBA макросов

Пароль на Открытие

1. Запустите Word, перейдите в раздел «Открыть» («Open») и просто кликните по нужному файлу. Так вы выберете его и запустите процесс открытия

2. Введите свой известный пароль и откройте Word файл (если пароль неизвестен, вот инструкция, как его восстановить)

3. Перейдите в раздел «Файл»→«Информация» («File»→«Info»), отщёлкните меню «Защита документа» («Protect Document») и
выберите опцию «Зашифровать с Паролем» («Encrypt with Password»)

4. В новом окне сотрите установленный пароль, щёлкните по кнопке «ОК» и пересохраните файл. Можете сохранить его с новым именем.
Тогда у вас будет два Word файла: оригинал с парольной защитой и новый, разблокированный.

Вот и всё! Данные расшифрованы, а «Пароль на Открытие» удалён. При следующих открытиях файла, пароль не понадобится. …ну, если вы пересохраняли
оригинал, а не сохраняли новый файл без пароля, конечно. 😜

Пароль Записи Изменений

1. Запустите Word и инициируйте открытие нужного файла, введите «Пароль Записи Изменений» («Password to Modify») и продолжайте

2. В разделе «Файл» («File») кликните по пункту меню «Сохранить как» («Save As»), далее по меню
«Инструменты» («Tools»), выберите «Основные настройки» («General Options…»)

3. В новом окне сотрите «Пароль Записи Изменений», щёлкните по «ОК» и сохраните разблокированный файл

«Пароль записи изменений» удалён!

Смотрите: Точно так же снимается блокировка «Паролем на Открытие»: кроме пароля записи измеенний, в окне настроек можно стереть и
этот пароль. А ещё, здесь же можно не только удвлить, но и изменить оба этих пароля.

Пароль Ограничения Редактирования Word

1. Откройте Word файл с ненужной блокировкой и перейдите в раздел «Рецензирование» («Review»), щёлкните по
«Защита» («Protection») и далее по «Ограничения Редактирования» («Restict Editing»)

2. В появившемся окне нажмите кнопку «Удалить Защиту» («Stop Protection»), введите известный пароль и нажмите «OK» – это
разблокиреет ограничения редактирования, установленные в этом Word документе.

Пароль Защиты VBA Макросов

1. Привычным способом откройте нужный Word файл с VBA паролем, нажмите комбинацию клавиш «Alt+F11». Вы попадёте в редактор VBA кода. Вызовите
окно «Свойств VBA проекта» («VBAProject Properties…»). Это делается через меню редактора «Инструменты» («Tools»)

2. Редактор запросит VBA пароль для доступа к данным Word файла. Введите его и нажмите «ОК»

3. В появившемся окне свойств VBA проекта перейдите во вкладку «Защита» («Protection»), снимите флажок с опции
«Закрыть проект от просмотра» («Lock project for viewing»), сотрите установленный VBA пароль в полях
«Пароль» («Password») и «Подтвердить пароль» («Confirm password»). Это всё. Далее нажмите на
«OK» и сохраните файл.

Вы успешно разблокировали пароль защиты VBA макросов, а VBA код в незащищённом виде сохранён в вашем Word файле.

Как разблокировать Word файл с забытым паролем

Решение для забытого или потерянного Word пароля – это Word password unlocker. Чаще всего это Windows-программы для восстановления или удаления паролей (хотя, бывают и
онлайн сервисы).

Рекомендую Accent OFFICE Password Recovery. И вот почему:

1. Пароли простой защиты от непреднамеренных изменений AccentOPR подбирает или удаляет мгновенно для всех версий Word.
2. Пароль стойкой защиты с шифрованием, AccentOPR всегда ищет на максимальной скорости вашего компьютера.
3. Перебор «Пароля для открытия» к Word 2007-2021 существенно ускоряется на видеокартах AMD и NVIDIA.

Accent OFFICE Password Recovery для файлов Microsoft Office и OpenOffice/LibreOffice всех версий

22.01

Скачать x86 (10032 Kb)

Скачать x64 (11736 Kb)

Полный список ключевых возможностей Accent OFFICE Password Recovery:

• поддержка форматов Microsoft Word 6-2021 (а также Access, PowerPoint, Excel и LibreOffice/OpenOffice)
• моментальный подбор или удаление паролей простой защиты
• высокая скорость перебора паролей стойкой защиты с шифрованием (asm-оптимизированный исходный код)
• GPU ускорение на видеокартах NVIDIA/AMD для docx-файлов Word 2007-2021
• гарантированная 100% успешная расшифровка файлов Word 6-2003 (поиск 40-битного ключа шифрования)
• три атаки на пароль (прямой перебор, атака по расширенной маске, атака по словарю)
• изменяемые сценарии атак на пароль (по описанию последовательной цепочки атак)
• гибкое манипулирование диапазоном проверки (позиционная маска, объединение и мутация словарей)
• автосохранение статуса поиска пароля (повторный запуск атаки с места остановки)
• графический интерфейс Windows и запуск из командной строки

Использование этой программы-разблокировщика паролей Word сводится к открытию защищённого паролем файла и настройке диапазона для перебора «Пароля на Открытие»,
если это необходимо. Пароли к остальной простой защите, Accent OFFICE Password Recovery подбирает или удаляет мгновенно без каких либо настроек для всех версий Word.

Смотрите, как это работает (в видео демонстрируются примеры для Excel, но для Word всё это работает так же):

<?/*https://img.youtube.com/vi/HRhSj84lbhk/hqdefault.jpg*/?>

Восстановление паролей Excel 95-2019 в AccentWPR/AccentOPR

С восстановленным в Accent OFFICE Password Recovery паролем можно успешно разблокировать Word файл по инструкции выше.

Популярные Вопросы о защите Microsoft Word

I adjusted your original code, so it’s not dependent on the password being a certain length. Also it will now move from left to right, adding a new character with each pass, and prevents the popups when trying to open the document. This can be used for workbooks as well.

WARNING** The brute force method is really not even worth it. It takes a very long time to run. If it is an encrypted password, then this may be the best option without downloading a third party password breaker.

Sub PasswordBreakerWord()
Dim WordApp As Object
Dim WordDoc As Object
Dim strPath As String
Dim passAtmp As String

Application.DisplayAlerts = False
Application.ScreenUpdating = False

Set WordApp = CreateObject("Word.Application")
Set WordDoc = CreateObject("Word.Document")
strPath = Environ("USERPROFILE") & "Desktopblah.docx"

Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
Dim i7 As Integer, i8 As Integer, i9 As Integer
Dim i10 As Integer, i11 As Integer, i12 As Integer

For i1 = 31 To 126: For i2 = 31 To 126: For i3 = 31 To 126
For i4 = 31 To 126: For i5 = 31 To 126: For i6 = 31 To 126
For i7 = 31 To 126: For i8 = 31 To 126: For i9 = 31 To 126
For i10 = 31 To 126: For i11 = 31 To 126: For i12 = 31 To 126

passAtmp = Chr(i12) & Chr(i11) & Chr(i10) & Chr(i9) & Chr(i8) & Chr(i7) & Chr(i6) & Chr(i5) & Chr(i4) & Chr(i3) & Chr(i2) & Chr(i1)
Debug.Print passAtmp

On Error Resume Next
Set WordDoc = WordApp.Documents.Open(strPath, , True, , passAtmp)
If Err <> 0 Then
    On Error GoTo 0
Else
    MsgBox "password is: " & passAtmp
    Debug.Print passAtmp
    WordApp.Quit
    Application.DisplayAlerts = True
    Application.ScreenUpdating = False
    Exit Sub
End If

Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next

End Sub