Permission.ApplyPolicy メソッド (Office)

指定したアクセス許可ポリシーをアクティブ ドキュメントに適用します。

構文

式。ApplyPolicy (FileName)

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

パラメーター

名前	必須 / オプション	データ型	説明
FileName	必須	String	アクセス許可ポリシー テンプレート ファイルのパスとファイル名。

注釈

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

例

次の使用例は、アクティブ ドキュメントに対してアクセス許可を有効にし、管理用アクセス許可ポリシーを適用します。

 Dim irmPermission As Office.Permission 
 Set irmPermission = ActiveWorkbook.Permission 
 Dim strIRMInfo As String 
 Select Case irmPermission.Enabled 
 Case True 
 strIRMInfo = "Permissions are already restricted on this document." 
 Case False 
 With irmPermission 
 .Enabled = True 
 .ApplyPolicy ("\\server\share\permissionpolicy.xml") 
 End With 
 strIRMInfo = "Permissions are now restricted on this document " & _ 
 vbCrLf & _ 
 " and the permission policy has been applied." 
 End Select 
 MsgBox strIRMInfo, vbInformation + vbOKOnly, "IRM Information" 
 Set irmPermission = Nothing 

関連項目

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

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

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