Permission.DocumentAuthor-Eigenschaft (Office)

  • Artikel

Ruft den Namen des Autors des aktiven Dokuments in E-Mail-Form ab oder legt den Namen fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. DocumentAuthor

Ausdruck Eine Variable, die ein Permission-Objekt darstellt.

HinwBemerkungeneise

DocumentAuthor -Eigenschaft zurückgeben oder festlegen den Autor des aktiven Dokuments. Der Autor verfügt das Dokument immer explizit (über ein UserPermission -Objekt) erteilt.

DocumentAuthor -Eigenschaft kann nur in ein anderes Konto geändert werden, die über die Benutzeroberfläche Berechtigungen eingeschränkten Inhalte auf dem lokalen Computer öffnen zertifiziert wurde. In den meisten Fällen können Benutzer, die über ein einzelnes Windows-Konto verfügen, nur zwischen ihren Windows- und Passport-Identitäten wählen.

Wenn die Windows- und Passport-Identitäten des Benutzers dieselbe E-Mail-Adresse verwenden, verwenden Sie das Format passport:someone@example.com , um die Passport-Identität als DocumentAuthor-Eigenschaft anzugeben.

Beispiel

Das folgende Beispiel zeigt Informationen zu Berechtigungseinstellungen des aktiven Dokuments einschließlich des Autors an.

 Dim irmPermission As Office.Permission 
 Dim strIRMInfo As String 
 Set irmPermission = ActiveWorkbook.Permission 
 If irmPermission.Enabled Then 
 strIRMInfo = "Permissions are enabled on this document." & vbCrLf 
 strIRMInfo = strIRMInfo & " View in trusted browser: " & _ 
 irmPermission.EnableTrustedBrowser & vbCrLf & _ 
 " Document author: " & irmPermission.DocumentAuthor & vbCrLf & _ 
 " Users with rights: " & irmPermission.Count & vbCrLf & _ 
 " Cache licenses locally: " & 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." 
 End If 
 Else 
 strIRMInfo = "Permissions are NOT enabled 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.