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


Метод Permission.RemoveAll (Office)

Удаляет все объекты UserPermission из коллекции Permission активного документа.

Синтаксис

expression. Removeall

Выражение Переменная, представляющая объект Permission .

Замечания

Метод RemoveAll удаляет все userPermissions , добавленные в коллекцию Разрешений , и отключает ограничения для активного документа. После вызова метода RemoveAll свойство Enabled объекта Permission возвращает значение 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 и обратная связь.