Поделиться через


Workbook.ChangeFileAccess Метод (2007 System)

Обновлен: Ноябрь 2007

Изменяет права доступа для книги. Может потребоваться загрузка обновленной версии с диска.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
Public Sub ChangeFileAccess ( _
    Mode As XlFileAccess, _
    WritePassword As Object, _
    Notify As Object _
)
'Применение
Dim instance As Workbook
Dim Mode As XlFileAccess
Dim WritePassword As Object
Dim Notify As Object

instance.ChangeFileAccess(Mode, WritePassword, _
    Notify)
public void ChangeFileAccess(
    XlFileAccess Mode,
    Object WritePassword,
    Object Notify
)

Параметры

  • WritePassword
    Тип: System.Object
    Задает пароль защиты от записи, если файл защищен от записи и параметр Mode имеет значение xlReadWrite. Игнорируется, если для файла не задан пароль или если параметр Mode имеет значение xlReadOnly.
  • Notify
    Тип: System.Object
    Значение true для уведомления пользователя о том, что невозможен немедленный доступ к файлу.

Заметки

Если файл открыт в режиме "только для чтения", то к нему нельзя получить монопольный доступ. Если изменить режим доступа к файлу с "только для чтения" на "чтение/запись", Microsoft Office Excel потребуется выполнить загрузку новой копии файла, чтобы обеспечить отсутствие изменений в то время, когда файл был открыт только для чтения.

Необязательные параметры

Сведения о необязательных параметрах см. в разделе Общие сведения о необязательных параметрах в решениях Office.

Примеры

В следующем примере кода на экран выводится сообщение, если свойство ReadOnlyRecommended имеет значение true, а свойство ReadOnly — значение false. Затем путем вызова метода ChangeFileAccess пользователю предлагается установить значение "только для чтения" для режима доступа к файлу.

В этом примере демонстрируется настройка уровня документа.

Private Sub MakeWorkbookReadOnly()
    If Me.ReadOnlyRecommended AndAlso Not Me.ReadOnly Then
        ' Change the access level of the document to read-only  
        ' if the user clicks yes.
        If MessageBox.Show("Set this document to read-only?", _
            "Sample", MessageBoxButtons.YesNo) = DialogResult.Yes Then
            Me.ChangeFileAccess(Excel.XlFileAccess.xlReadOnly, Notify:=False)
        End If
    End If
End Sub
private void MakeWorkbookReadOnly()
{
    if (this.ReadOnlyRecommended && !this.ReadOnly)
    {
        // Change the access level of the document to read-only if the user 
        // clicks yes.
        if (MessageBox.Show("Set this document to read-only?",
            "Sample", MessageBoxButtons.YesNo) == DialogResult.Yes)
        {
            this.ChangeFileAccess(Excel.XlFileAccess.xlReadOnly,
                missing, false);
        }
    }
}

Разрешения

См. также

Ссылки

Workbook Класс

Workbook - члены

Microsoft.Office.Tools.Excel - пространство имен