Permission.PermissionFromPolicy プロパティ (Office)

作業中の文書にアクセス許可ポリシーが適用されているかどうかを示す ブール 値を取得します。 読み取り専用です。

構文

式。PermissionFromPolicy

式Permission オブジェクトを表す変数。

注釈

Microsoft Office の Information Rights Management では、ユーザーとグループとそのドキュメントのアクセス許可を一覧表示する管理アクセス許可ポリシーの使用がサポートされています。 管理 は、最終アクセス許可のドキュメントで作業中の文書にアクセス許可ポリシーが適用されたかどうかを示す ブール 値を返します。

管理 は、常に 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 のサポートおよびフィードバックを参照してください。