Propriedade Permission.PermissionFromPolicy (Office)
Obtém um valor Boolean que indica se uma política de permissão foi aplicada ao documento ativo. Somente leitura.
Sintaxe
expressão. PermissionFromPolicy
Expressão Uma variável que representa um objeto Permission .
Comentários
O Gerenciamento de Direitos de Informação no Microsoft Office dá suporte ao uso de políticas de permissão administrativa que listam usuários e grupos e suas permissões de documento. A propriedade PermissionFromPolicy retorna um valor Boolean que indica se uma política de permissão foi aplicada ao documento ativo, que as permissões de tempo últimos foram habilitadas no documento.
A propriedade PermissionFromPolicy retorna False quando verificada por um não proprietário do documento, mesmo quando o usuário tem permissões de modelo de objeto.
Exemplo
O exemplo a seguir exibe as informações sobre a diretiva de permissão do documento ativo.
Dim irmPermission As Office.Permission
Dim strIRMInfo As String
Set irmPermission = ActiveWorkbook.Permission
If irmPermission.Enabled Then
strIRMInfo = "Permissions are restricted on this document." & vbCrLf
If irmPermission.PermissionFromPolicy Then
strIRMInfo = strIRMInfo & " Permissions applied from policy:" & vbCrLf & _
" Policy name: " & irmPermission.PolicyName & vbCrLf & _
" Policy description: " & irmPermission.PolicyDescription
Else
strIRMInfo = strIRMInfo & " Default permissions applied." & vbCrLf & _
" Default policy name: " & irmPermission.PolicyName & vbCrLf & _
" Default policy description: " & irmPermission.PolicyDescription
End If
Else
strIRMInfo = "Permission are NOT restricted on this document."
End If
MsgBox strIRMInfo, vbInformation + vbOKOnly, "IRM Information"
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.