Снять программно защиту с файла Excell

v8: Снять программно защиту с файла Excell

по мотивам этой ветки.

а при снятии защиты по идее должно спросить пароль. как сделать так, чтобы при снятии защиты или установлении передать пароль.

Sheets(2).Protect Password:="1111", UserInterfaceOnly:=True

но это для VB.

Ой нарушаете, гражданин, начальник :)

чего? нарушаю. есть защищенный лист, есть пароли. есть 1с заполняющая лист данными и получающая. надо сначала снять защиту а затем установить назад. чтобы юзер в шаблоне не попортил что-то случайно

Worksheet.Unprotect Method
Removes protection from a sheet or workbook. This method has no effect if the sheet or workbook isn't protected.
Syntax

expression.Unprotect(Password)

expression   A variable that represents a Worksheet object.

Parameters

Name Required/Optional Data Type Description
Password Optional Variant A string that denotes the case-sensitive password to use to unprotect the sheet or workbook. If the sheet or workbook isn't protected with a password, this argument is ignored. If you omit this argument for a sheet that's protected with a password, you'll be prompted for the password. If you omit this argument for a workbook that's protected with a password, the method fails.

Remarks


If you forget the password, you cannot unprotect the sheet or workbook. It's a good idea to keep a list of your passwords and their corresponding document names in a safe place.

Лист.Protect();    Установка защиты на лист
Лист.UnProtect();    Снятие защиты с листа

т.е. внутри () указать тупо пароль.