Невозможно вставить пароль в файлы Excel

Question

У меня есть несколько файлов Excel: некоторые были созданы с паролем, а некоторые без пароля. Те, у кого нет пароля, могут быть открыты в Excel 2010 и новее. Но те, у кого есть пароль, не отображают окно для ввода этого пароля.

Как мне исправить эту проблему?

Answer 1

Решение VBA:

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

Sub WorkbookOpen()

Application.ScreenUpdating = False

Dim wbk1 As Workbook
Dim wbk2 As Workbook

Set wbk1 = ThisWorkbook
Set wbk2 = Workbooks.Open(Filename:="Your Path", Password:="your Password")


Set wbk1 = Nothing
Set wbk2 = Nothing


MsgBox "Logged the File."

Application.ScreenUpdating = True

End Sub

Решение не VBA:

Иногда из-за установленных надстроек возникает эта проблема. Чтобы избавиться от этого, я хотел бы предложить сделать следующее.

• Нажмите Файл, затем Параметры.
• Хит Центр Доверия, Настройки Центра Доверия, Надстройки.
• Проверьте последний, отключите все надстройки.
• Закройте Excel, перезагрузите компьютер и откройте файл.

NB. После открытия файла включите все надстройки.

Другое есть,

• Файл, Опция.
• Центр управления безопасностью, Настройки центра управления безопасностью, Надежные расположения.
• Подтвердите, сохраняете ли вы файл в надежном месте.
• Закройте Excel, перезагрузите компьютер и откройте файл.