Workbook.Protect Метод (2007 System)
Обновлен: Ноябрь 2007
Защищает книгу от изменений.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Sub Protect ( _
Password As Object, _
Structure As Object, _
Windows As Object _
)
'Применение
Dim instance As Workbook
Dim Password As Object
Dim Structure As Object
Dim Windows As Object
instance.Protect(Password, Structure, _
Windows)
public void Protect(
Object Password,
Object Structure,
Object Windows
)
Параметры
- Password
Тип: System.Object
Пароль доступа к книге, задаваемый с учетом регистра. Если этот аргумент не задан, можно снять защиту рабочей книги, не используя пароль. В противном случае чтобы снять защиту книги, необходимо указать пароль.
- Structure
Тип: System.Object
Значение true, чтобы защитить структуру книги (относительное положение листов). Значение по умолчанию — false.
- Windows
Тип: System.Object
Значение true, чтобы защитить окна книги. Если этот аргумент не задан, защита для окон отсутствует.
Заметки
Надежный пароль должен состоять из строчных и прописных букв, цифр и символов. Ненадежный пароль не содержит сочетания этих элементов. Например, "Y6dh!et5" — надежный пароль, а "House27" — нет. Надежный пароль должен легко запоминаться, чтобы его не нужно было записывать.
Необязательные параметры
Сведения о необязательных параметрах см. в разделе Общие сведения о необязательных параметрах в решениях Office.
Примеры
В следующем примере кода метод Protect вызывается для защиты структуры книги и окон книги, но без установки защиты паролем. После этого программный код в данном примере проверяет, установлена ли такая защита, путем обращения к свойствам ProtectStructure и ProtectWindows.
В этом примере демонстрируется настройка уровня документа.
Private Sub ProtectWorkbook()
Me.Protect(Structure:=True, Windows:=True)
If Me.ProtectStructure Then
MsgBox("You cannot add, delete or change the location " & _
"of sheets in this workbook.")
End If
If Me.ProtectWindows Then
MsgBox("You cannot arrange windows in this workbook.")
End If
End Sub
private void ProtectWorkbook()
{
this.Protect(missing, true, true);
if (this.ProtectStructure)
{
MessageBox.Show("You cannot add, delete or change the location " +
"of sheets in this workbook.");
}
if (this.ProtectWindows)
{
MessageBox.Show("You cannot arrange windows in this workbook.");
}
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.