455

Как снять защиту с VBAProject в Excel

Поставили пароль на VBAProject и забыли его? Есть файл с макросами, хотите в них разобраться, но проект защищён? Не беда, сломаем за 5 минут.

Пошаговая инструкция:

1. Закройте файл, сделайте его копию на случай Fuck Up.

2. Измените расширение файла .xlsm на .zip (пкм Переименовать или F2):

3. Откройте zip файл, найдите папку xl и в ней файл vbaProject.bin:

4. Перетащите файл vbaProject.bin из архива:

5. Откройте его с помощью Notepad++ :

6. При помощи поиска (Ctrl+F) найдите строку DPB и замените в ней букву B на любую другую, сохраните и закройте файл:

7. Перенесите обновленный файл vbaProject.bin обратно в архив, закройте архив.

8. Измените расширение файла .zip в .xlsm.

9. Откройте файл, в появившемся диалоговом окне нажмите Да:

10. Откройте Visual Basic (Alt+F11) или вкладка Разработчик ► Visual Basic, в появившемся диалоговом окне нажмите Ок:

11. Окне редактора выберите Tools ► VBAProject Properties...:

12. На вкладке Protection уберите галку Lock project for viewing и сохраните файл:

Готово!

Не сработало? Поможет бесплатная надстройка MACROTools VBA Excel, а надстройка EXCELTools автоматизирует ваши рутинные и монотонные операции в MS Excel.

При желании проект можно поддержать рублем.

Хотите научиться самостоятельно писать макросы и разбираться в VBA, но не знаете с чего начать? Лучший канал на YouTube по этой теме:

Больше постов читайте по тегу «Аналитика». А если хотите изучить новую профессию, посмотрите актуальные курсы от проверенных школ с реальными отзывами на сайте Пикабу Курсы.

MS, Libreoffice & Google docs

762 поста14.9K подписчиков

Правила сообщества

1. Не нарушать правила Пикабу

2. Публиковать посты соответствующие тематике сообщества

3. Проявлять уважение к пользователям

4. Не допускается публикация постов с вопросами, ответы на которые легко найти с помощью любого поискового сайта.

По интересующим вопросам можно обратиться к автору поста схожей тематики, либо к пользователям в комментариях


Важно - сообщество призвано помочь, а не постебаться над постами авторов! Помните, не все обладают 100 процентными знаниями и навыками работы с Office. Хотя вы и можете написать, что вы знали об описываемом приёме раньше, пост неинтересный и т.п. и т.д., просьба воздержаться от подобных комментариев, вместо этого предложите способ лучше, либо дополните его своей полезной информацией и вам будут благодарны пользователи.

Утверждения вроде "пост - отстой", это оскорбление автора и будет наказываться баном.

3
Автор поста оценил этот комментарий

так вообще нелогично выглядит пост который начинается словами как взломать VBA пароль, а заканчивается - поддержите рублем вот вам курс VBA за пять минут

раскрыть ветку (1)
4
Автор поста оценил этот комментарий
К надстройке не имею отношения, просто годная вещь, почему не поддержать рублём, личное дело каждого
2
DELETED
Автор поста оценил этот комментарий

там вроде стойкое шифрование в последних версиях, Elcomsoft Advanced pasword recovery может днями ковырять, если пароль сложный и длинный. если например из одних цифр - то за полчаса или час

раскрыть ветку (1)
4
Автор поста оценил этот комментарий
Так мы и не пароль ищем, а сносим его
0
из леса, серьёзно
Автор поста оценил этот комментарий

А можно пароль снять, которым лист защищен от изменений?

раскрыть ветку (1)
1
Автор поста оценил этот комментарий

Первый способ. Переименовываем файл, вместо расширения “xlsx” - “zip”. Открываем архив. Переходим в папку “xl”, “worksheets”. Копируем на рабочий стол файл “sheet1”, ну или какой у вас защищен. Нажимаем правой кнопкой мыши на него, открыть с помощью “Блокнот”. Находим и удаляем текст в файле (<sheetProtection sheet="1" formatCells="0" formatColumns="0" formatRows="0" insertColumns="0" insertRows="0" insertHyperlinks="0" deleteColumns="0" deleteRows="0" sort="0" autoFilter="0" pivotTables="0"/>). Сохраняем файл. Переносим “sheet1” обратно в архив “xl”, “worksheets”. Переименовываем обратно архив в “xlsx”. Открываем Excel. Защита снята.

Второй способ, через с Google Диск. Открываем браузер, открываем Google Диск. Перекидываем файл с защитой. Кликаем п.к.м на него и выбираем “открыть с помощью Google Таблица. Отправляемся на вкладку “Файл” из списка выбираем “Скачать как Microsoft Excel”. Печатаем имя и нажимаете “Сохранить”. Готово.

показать ответы
1
Автор поста оценил этот комментарий
У меня работает, без надстроек, чтобы лишнего не ставить, так конечно от ситуации зависит
0
Автор поста оценил этот комментарий
😂 а желание, в расчёт не берём? Вам видимо просто эта тема не интересна. Про 5 часов это автор пишет, понятно, что у каждого свой мозговой движок... и скорость. Наверное это про тайминг материала. Сам смотрел почти все, очень доступно излагает
0
Автор поста оценил этот комментарий

С нуля за 5 часов можно научиться всему.

Да, верю.

раскрыть ветку (1)
0
Автор поста оценил этот комментарий
Вы не верьте, проверьте) можно месяцы потратить на изучение книг VBA, на канале выжимка с примерами, бесплатно!
показать ответы
0
DELETED
Автор поста оценил этот комментарий
А так сатану случайно не призовешь? А то очково как-то
раскрыть ветку (1)
0
Автор поста оценил этот комментарий

делаем копию (в место святой воды)

0
Автор поста оценил этот комментарий

а есть способ с винрар архива пароль снять?

раскрыть ветку (1)
0
Автор поста оценил этот комментарий
Автор поста оценил этот комментарий
С помощью указанной в посте надстройки можно вскрыть защиту и сделать viewable надстройку Николая Павлова PLEX. Потом удалить в нем строчку, сравнивающую дату установки надстройки с текущей датой, и пользоваться этой надстройкой без покупки.
раскрыть ветку (1)
0
Автор поста оценил этот комментарий
Николай, прости
показать ответы
3
Автор поста оценил этот комментарий

А как вот такую защиту снять?

Иллюстрация к комментарию
раскрыть ветку (1)
0
Автор поста оценил этот комментарий
В конце поста утилита, ломает на раз
показать ответы
8
Автор поста оценил этот комментарий
Блин, давным давно уже макрос придуман, снимает любой пароль с проекта за секунду. А способ с архивом в большинстве случаев не работает.
раскрыть ветку (1)
0
Автор поста оценил этот комментарий
Так ссылочка внизу на этот случай
показать ответы
2
Автор поста оценил этот комментарий

а у меня снимает защиту :)

раскрыть ветку (1)
Автор поста оценил этот комментарий

я не говорю, что макрос плохой

8
Автор поста оценил этот комментарий

упрощу

Sub Password_Cracker()

Dim t!

Dim i As Integer, j As Integer, k As Integer

Dim l As Integer, m As Integer, n As Long

Dim i1 As Integer, i2 As Integer, i3 As Integer

Dim i4 As Integer, i5 As Integer, i6 As Integer

Dim kennwort As String

t = Timer

On Error Resume Next

For i = 65 To 66: For j = 65 To 66: For k = 65 To 66

For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66

For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66

For i5 = 65 To 66: For i6 = 65 To 66

kennwort = Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6)

For n = 32 To 126

ActiveSheet.Unprotect kennwort & Chr(n)

If Err Then

Err.Clear

Else

MsgBox "Done in " & Format(Timer - t, "0.0 sec")

Exit Sub

End If

Next: Next: Next: Next: Next: Next

Next: Next: Next: Next: Next: Next

End Sub

раскрыть ветку (1)
Автор поста оценил этот комментарий

Ага а теперь буквы добавим в код, у меня висит.......

показать ответы

Темы

Политика

Теги

Популярные авторы

Сообщества

18+

Теги

Популярные авторы

Сообщества

Игры

Теги

Популярные авторы

Сообщества

Юмор

Теги

Популярные авторы

Сообщества

Отношения

Теги

Популярные авторы

Сообщества

Здоровье

Теги

Популярные авторы

Сообщества

Путешествия

Теги

Популярные авторы

Сообщества

Спорт

Теги

Популярные авторы

Сообщества

Хобби

Теги

Популярные авторы

Сообщества

Сервис

Теги

Популярные авторы

Сообщества

Природа

Теги

Популярные авторы

Сообщества

Бизнес

Теги

Популярные авторы

Сообщества

Транспорт

Теги

Популярные авторы

Сообщества

Общение

Теги

Популярные авторы

Сообщества

Юриспруденция

Теги

Популярные авторы

Сообщества

Наука

Теги

Популярные авторы

Сообщества

IT

Теги

Популярные авторы

Сообщества

Животные

Теги

Популярные авторы

Сообщества

Кино и сериалы

Теги

Популярные авторы

Сообщества

Экономика

Теги

Популярные авторы

Сообщества

Кулинария

Теги

Популярные авторы

Сообщества

История

Теги

Популярные авторы

Сообщества