Método Permission.ApplyPolicy (Office)

Aplica la directiva de permisos especificada al documento activo.

Sintaxis

expresión. ApplyPolicy (FileName)

expresión Variable que representa un objeto Permission .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
FileName Necesario String Ruta de acceso y nombre de archivo del archivo de plantilla de directiva de permisos.

Observaciones

Microsoft Office Information Rights Management admite el uso de directivas de permisos administrativos que muestran usuarios y grupos y sus permisos de documento. El método ApplyPolicy aplica una directiva de permisos al documento activo.

Ejemplo

En el ejemplo siguiente, se habilitan permisos en el documento activo y se aplica una directiva de permisos de administrador.

 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 

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.