共用方式為


(Office) 的 Permission.PermissionFromPolicy 屬性

取得表示權限原則是否已套用至使用中文件的 Boolean 值。 唯讀。

語法

運算式PermissionFromPolicy

表達 代表 Permission 物件的變數。

註解

Microsoft Office 中的資訊版權管理支援使用列出使用者和群組及其檔許可權的系統管理許可權原則。 PermissionFromPolicy 屬性會傳回 Boolean 值,指出權限原則是否已套用至使用中文件的最後一次權限已啟用文件。

PermissionFromPolicy 屬性永遠會傳回 False 時檢查非擁有者的文件中,即使使用者擁有物件模型權限。

範例

下列範例會顯示關於使用中文件的權限原則資訊。

 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 
 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 = "Permission are NOT restricted on this document." 
 End If 
 MsgBox strIRMInfo, vbInformation + vbOKOnly, "IRM Information" 
 Set irmPermission = Nothing 

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應