Método Permission.RemoveAll (Office)

Remove todos os objetos UserPermission da coleção Permissão do documento ativo.

Sintaxe

expressão. Removeall

Expressão Uma variável que representa um objeto Permission .

Comentários

O método RemoveAll remove todas as UserPermissions que foram adicionadas à coleção Permission e desabilita restrições no documento ativo. Depois de chamar o método RemoveAll , a propriedade Habilitada do objeto Permission retorna False e a propriedade Count retorna 0 (zero).

Exemplo

O exemplo a seguir usa o método RemoveAll para remover todas as permissões de usuário e desativar restrições no documento ativo.

 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 

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.