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

定义

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

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 属性为 truefalseReadOnlyRecommended显示一条消息,然后提示用户通过调用 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 解决方案中的可选参数

适用于