Poldet1.ru

Пул Дет №1
1 просмотров
Рейтинг статьи
1 звезда2 звезды3 звезды4 звезды5 звезд
Загрузка...

Как разрешить редактирование объектов на защищенном листе в Excel?

Как снять защиту с листа Excel, не зная пароль?

kak_snyat_zashitu_lista_excel_esli_zabili_parol.jpg

Файл может попасть в чужие руки, поэтому Microsoft позволяет пользователям устанавливать пароль для получения доступа к определенному листу или всему документу. Можно даже заблокировать отдельные ячейки от редактирования и просмотра. Если вы забыли пароль, а в файле есть важные данные, что делать? Для сброса пароля существует несколько программ Windows.

Способ 1: Снять пароль при помощи архиватора

Этот метод лучше всего работает со старыми версиями программы (до 2010 года). В более новых версиях существует риск потери данных из-за новых настроек безопасности. Идея заключается в том, чтобы получить доступ к каждому листу отдельно. Для этого вам понадобится программа архивации, которая может работать с zip-файлами, и редактор кода (подойдет даже стандартный блокнот Windows).

Excel поддерживает только файлы .xlsx, поэтому обратите внимание на формат файла, в котором сохранен документ, так как более старые версии сохраняют документы в формате .xls. Пожалуйста, пересохраните файл, если его расширение .xls. Для этого откройте его в Excel, выберите файл в верхнем меню и в выпадающем меню «Сохранить как», затем в разделе «Тип файла» выберите «Книга Excel (.xlsx)».

sohranit-list.png

Затем необходимо изменить расширение .xlsx на .zip. Щелкните файл правой кнопкой мыши и выберите Переименовать. Добавьте .zip в конец имени файла. Пример: «Table1.xlsx» вы переименовываете в «Table1.zip».

menyaem-imya.png

При переименовании файла, если вы не видите расширение, выполните следующие шаги:

  1. Перейдите в «Панель управления».
  2. Выберите тип представления «Мелкие значки» и найдите «Параметры папки» (также может называться «Параметры браузера»).

papki-e1487503594812.png

Перейдите в «Вид», затем в разделе «Дополнительные настройки» найдите «Скрывать расширения файлов для зарегистрированных типов файлов» и снимите галочку. Примените изменения.

Читайте так же:
Как применить произвольный числовой формат к диаграмме Excel?

nastroyka-papok.png

Сделав это, вы сможете вручную отметить любое расширение файла без каких-либо проблем.

Затем откройте файл и перейдите в папку «xl», затем в «worksheets», где находятся электронные таблицы в формате .xml. В этом случае листы называются «лист» и нумеруются по дате создания (лист1, лист2 и т.д.). Откройте файл с помощью обычного блокнота или специальной программы для записи кода (например, NotePad++).

rabota-v-arhive.png

В открывшемся файле найдите фрагмент “sheetProtection”. Т.к. в файле будет много кода, рекомендуется воспользоваться быстрым поиском по содержимому при помощи сочетания клавиш Ctrl+F. Находите нужный блок, имеющий данную структуру ““sheetProtection переменная1=”” переменная2=””…”, более подробно можно видеть на скриншоте ниже. Для сброса пароля удаляете весь этот блок.

robota-s-kodom.png

Если вы проделаете эту процедуру с листом, который был сохранен в программе версии 2010 и выше, вы потеряете все данные. Решением этой проблемы является удаление только значения переменной «password», а не всего блока. Что касается версии с 2016 года и выше, то там переменная «password» отсутствует, поэтому удалить пароль архиватором в данном случае не получится.

Вы должны изменить расширение файла обратно на .xlsx после сохранения изменений таким же образом, как вы изменили его на .zip.

Этот метод позволяет снять защиту только с отдельных листов. Поэтому, если у вас есть большой, полностью защищенный паролем файл Excel с несколькими листами, вам придется снять защиту с каждого листа вручную.

Способ 2: Удаление пароля через Макрос

В этом случае вам понадобится только сама таблица Excel и возможность работы с консолью разработчика. Обычно панель разработчика не отображается в файле, поэтому, чтобы включить ее, следуйте следующим инструкциям:

reshim-razrabotchika-e1487504918696.png

  1. Перейдите в раздел «Файл» в левой части верхнего меню приложения.
  2. Затем перейдите в раздел «параметры», в левом меню выберите «настройки ленты».
  3. В разделе «Основные вкладки» (справа) выберите «Разработчик».
Читайте так же:
Как проверить, соответствует ли значение ячейки списку в Excel?

Найдите кнопку «Макросы» в открывшемся окне Разработчика или нажмите Alt+F8.

makros.png

Введите здесь имя макроса (подойдет любое имя, лишь бы оно не содержало русских букв и пробелов). Нажмите кнопку «Создать». Ввод кода инициируется системой.

Введите следующий код

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 GoTo err_ 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) MsgBox «Done in » & Format(Timer — t, «0.0 sec») Exit Sub nxt_: Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next Exit Sub err_: Resume nxt_ End Sub

После сохранения изменений закройте окно. Чтобы просмотреть макрос, снова нажмите Alt+F8, находясь в режиме разработчика. Выбрав его, нажмите на кнопку «Выполнить» в правом углу.

голоса
Рейтинг статьи
Ссылка на основную публикацию
Adblock
detector