Berechtigungsobjekt (Office)

Die Permission -Eigenschaft des Document -Objekts in Microsoft Word, ein Workbook -Objekt in Microsoft Excel und ein Presentation -Objekt in Microsoft PowerPoint gibt ein Permission -Objekt zurück.

HinwBemerkungeneise

Verwenden Sie das Permission -Objekt zum Einschränken von Berechtigungen für das aktive Dokument und bestimmte berechtigungseinstellungen festzulegen oder zurückzugeben.

Das Permission-Objekt gewährt Zugriff auf eine Auflistung von UserPermission-Objekten . Verwenden Sie das UserPermission-Objekt, um bestimmte Gruppen von Rechten einzelnen Benutzern zuzuordnen. Während einige Berechtigungen, die über die Benutzeroberfläche erteilt werden (z. B. msoPermissionPrint), für alle Benutzer gelten, können Sie das UserPermission-Objekt verwenden, um Berechtigungen individuell pro Benutzer und mit individuellem Ablaufdatum zuzuweisen.

Microsoft Office Information Rights Management unterstützt die Verwendung von Administratorberechtigungsrichtlinien, die Benutzer und Gruppen und deren Dokumentberechtigungen auflisten. Verwenden Sie die ApplyPolicy -Methode zum Anwenden einer Berechtigungsrichtlinie und die Eigenschaften PermissionFromPolicy, PolicyName und PolicyDescription, um Richtlinieninformationen zurückzugeben.

Das Objektmodell Berechtigung ist verfügbar, ob Berechtigungen für das aktive Dokument eingeschränkt sind. Die Permission-Eigenschaft der Objekte Document, Workbook und Presentation gibt nicht Nothing zurück, wenn das aktive Dokument nicht über eingeschränkte Berechtigungen verfügt. Verwenden Sie die Enabled -Eigenschaft, um zu bestimmen, ob ein Dokument über eingeschränkte Berechtigungen verfügt.

Verwendung des Permission -Objekts löst einen Fehler aus, wenn der Windows-Rechteverwaltungsclient nicht installiert ist.

Beispiel

Das folgende Beispiel gibt Informationen zu den Berechtigungseinstellungen für das aktive Dokument zurück.

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

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.