Nota
L'accés a aquesta pàgina requereix autorització. Podeu provar d'iniciar la sessió o de canviar els directoris.
L'accés a aquesta pàgina requereix autorització. Podeu provar de canviar els directoris.
La propiedad Permission del objeto Document en un objeto de presentación en Microsoft PowerPoint, un objeto Workbook de Microsoft Excel y Microsoft Word devuelve un objeto Permission.
Observaciones
Utilice el objeto Permission para restringir los permisos al documento activo y para devolver o establecer configuraciones de permisos específicas.
El objeto Permission proporciona acceso a una colección de objetos UserPermission . Utilizar el objeto UserPermission para asociar conjuntos específicos de derechos a usuarios individuales. Aunque algunos permisos concedidos mediante la interfaz de usuario (por ejemplo msoPermissionPrint) se aplican a todos los usuarios, puede usar el objeto UserPermission para asignarlos a usuarios concretos con fechas de caducidad para cada usuario.
Microsoft Office Information Rights Management admite el uso de directivas de permisos administrativos que muestran usuarios y grupos y sus permisos de documento. Utilice el método ApplyPolicy para aplicar una directiva de permisos y las propiedades PermissionFromPolicy, PolicyName y PolicyDescription para devolver información de la directiva.
El modelo de objetos Permission está disponible tanto si los permisos están restringidos en el documento activo o no. La propiedad Permission de los objetos Document, Workbook y Presentation no devuelve Nothing cuando el documento activo no tiene permisos restringidos. Utilice la propiedad Enabled para determinar si un documento tiene permisos restringidos.
Uso del objeto Permission produce un error cuando el cliente de Windows Rights Management no está instalado.
Ejemplo
En el ejemplo siguiente se devuelve información sobre la configuración de permisos del documento activo.
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
strIRMInfo = strIRMInfo & " View in trusted browser: " & _
irmPermission.EnableTrustedBrowser & vbCrLf & _
" Document author: " & irmPermission.DocumentAuthor & vbCrLf & _
" Users with permissions: " & irmPermission.Count & vbCrLf & _
" Cache licenses: " & irmPermission.StoreLicenses & vbCrLf & _
" Request permission URL: " & irmPermission.RequestPermissionURL & 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 = "Permissions are NOT restricted on this document."
End If
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.