通过

WorkbookBase.ChangeFileAccess 方法

  • 项目

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

命名空间：  Microsoft.Office.Tools.Excel
程序集：  Microsoft.Office.Tools.Excel.v4.0.Utilities（在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中）

语法

声明
Public Sub ChangeFileAccess ( _
    mode As XlFileAccess, _
    writePassword As Object, _
    notify As Object _
)

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

.NET Framework 安全性

请参见

参考

WorkbookBase 类

Microsoft.Office.Tools.Excel 命名空间