WorkbookBase.ChangeFileAccess(XlFileAccess, Object, Object) 方法

定义

命名空间:

Microsoft.Office.Tools.Excel

程序集:

Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

更改工作簿的访问权限。 这可能需要从磁盘加载更新版本。

public void ChangeFileAccess (Microsoft.Office.Interop.Excel.XlFileAccess mode, object writePassword, object notify);

member this.ChangeFileAccess : Microsoft.Office.Interop.Excel.XlFileAccess * obj * obj -> unit

Public Sub ChangeFileAccess (mode As XlFileAccess, Optional writePassword As Object, Optional notify As Object)

参数

mode

XlFileAccess

XlFileAccess 值之一。 指定新的访问模式。

writePassword

Object

如果文件为写保留且 为 ，则指定写保留ModexlReadWrite密码。 如果文件没有密码或 为 xlReadOnly，则Mode忽略 。

notify

Object

如果为 true，则在无法直接访问文件时通知用户。

示例

下面的代码示例在 属性为 且 ReadOnly 属性为 truefalse时ReadOnlyRecommended显示一条消息，然后提示用户通过调用 ChangeFileAccess 方法将文件访问权限设置为只读。

此示例适用于文档级自定义项。

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,
                 false);
        }
    }
}

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

注解

如果文件以只读模式打开，则不具有该文件的独占访问权限。 如果将文件从只读更改为读/写，Microsoft Office Excel 必须加载该文件的新副本，以确保在将文件作为只读打开状态时未进行更改。

可选参数

有关可选参数的信息，请参阅 Office 解决方案中的可选参数。