Permission.StoreLicenses プロパティ (Office)

取得または、作業中の文書を表示するのにはユーザーのライセンスをユーザーがアクセス権の管理サーバーに接続できないときにオフラインで表示できるようにするのにはキャッシュかどうかを示す ブール 値を設定します。 値の取得と設定が可能です。

構文

式。StoreLicenses

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

注釈

StoreLicenses プロパティに対応 (とその値は、反対の) アクセス許可のユーザー インターフェイスで ユーザーの権限を確認するのには接続を必要とするオプションです。 StoreLicenses が False の場合、ドキュメント所有者以外のユーザーは、Microsoft Office で提供されている Information Rights Management サービスを使用してコンテンツが保護されている場合、ドキュメントを開くたびに、権限管理サーバーに接続し、ドキュメントを操作するためのライセンスを取得する必要があります。

例

次の使用例は、 StoreLicenses の設定など、作業中の文書のアクセス権の設定に関する情報を表示します。

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

関連項目

• アクセス許可オブジェクト のメンバー

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。