通过

Permission.RemoveAll 方法 (Office)

  • 项目

从活动文档的 Permission 集合中删除所有 UserPermission 对象。

语法

表达式。RemoveAll

表达 一个代表 Permission 对象的变量。

备注

RemoveAll 方法删除已添加到 Permission 集合中的所有 UserPermission，并禁用对活动文档的限制。 调用 RemoveAll 方法后，Permission 对象的 Enabled 属性返回 False，Count 属性返回 0 (零) 。

示例

下面的示例将使用 RemoveAll 方法删除所有用户权限，并禁用对活动文档的限制。

 Dim irmPermission As Office.Permission 
 Set irmPermission = ActiveWorkbook.Permission 
 If irmPermission.Enabled Then 
 irmPermission.RemoveAll 
 MsgBox "All permissions removed." & vbCrLf & _ 
 "Count: " & irmPermission.Count & vbCrLf & _ 
 "Enabled: " & irmPermission.Enabled, _ 
 vbInformation + vbOKOnly, "IRM Information" 
 Else 
 MsgBox "This document is not restricted.", _ 
 vbInformation + vbOKOnly, "IRM Information" 
 End If 
 Set irmPermission = Nothing

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。