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

by

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

В этой статье описаны действия по снятию защиты с защищенной электронной таблицы Excel в Microsoft Excel 365, а также в Microsoft Excel 2019, 2016 и 2013.

Как разблокировать электронную таблицу Excel в качестве владельца файла

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

  1. Откройте защищенную таблицу и выберите Обзор > Снять защиту с листа. Вы также можете щелкнуть защищенную таблицу правой кнопкой мыши и выбрать Снять защиту с листа.

    Вы можете определить защищенную электронную таблицу в разделе «Изменения» на вкладке «Обзор» на ленте. Если электронная таблица защищена, вы увидите параметр «Снять защиту с листа».

  2. Введите пароль, используемый для защиты электронной таблицы, затем выберите OK.

  3. Теперь ваша таблица не будет защищена, и ее можно будет изменить.

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

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

К счастью, эти шаги позволят вам снять защиту с вашей книги, используя сценарий Virtual Basic в качестве макроса для определения пароля.

  1. Откройте защищенную таблицу.

  2. Откройте редактор кода Visual Basic, нажав ALT + F11 или выберите Разработчик> Просмотреть код.

  3. В окне кода защищенного листа введите следующий код:

    Sub PasswordBreaker ()
    Dim i как целое число, j как целое число, k как целое число
    Dim l как целое число, m как целое число, n как целое число
    Dim i1 как целое число, i2 как целое число, i3 как целое число
    Dim i4 как целое число, i5 как целое число, i6 как целое число
    On Error Resume Next
    Для 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. Снять защиту 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)
    Exit Sub
    End If
    Следующая: Следующая: Следующая: Следующая: Следующая: Следующая
    Следующая: Следующая: Следующая: Следующая: Следующая: Следующая
    End Sub

  4. Выбрать Бег или нажмите F5 выполнить код.

  5. Выполнение кода займет несколько минут. По завершении вы получите всплывающее окно с паролем. Выбрать OK и ваша электронная таблица не будет защищена.

    Это не оригинальный пароль, и вам не нужно его запоминать.