Método Permission.ApplyPolicy (Office)
Aplica a diretiva de permissão especificada para o documento ativo.
Sintaxe
expressão. ApplyPolicy (FileName)
Expressão Uma variável que representa um objeto Permission .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
FileName | Obrigatório | String | O caminho e o nome do arquivo do arquivo de modelo de política de permissão. |
Comentários
O Gerenciamento de Direitos de Informação do 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. O método ApplyPolicy aplica uma diretiva de permissão ao documento ativo.
Exemplo
O exemplo a seguir habilita permissões no documento ativo e aplica uma diretiva de permissão administrativa.
Dim irmPermission As Office.Permission
Set irmPermission = ActiveWorkbook.Permission
Dim strIRMInfo As String
Select Case irmPermission.Enabled
Case True
strIRMInfo = "Permissions are already restricted on this document."
Case False
With irmPermission
.Enabled = True
.ApplyPolicy ("\\server\share\permissionpolicy.xml")
End With
strIRMInfo = "Permissions are now restricted on this document " & _
vbCrLf & _
" and the permission policy has been applied."
End Select
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.