次の方法で共有


PolicyItem オブジェクト (Office)

1 つのポリシーの設定を含む ServerPolicy オブジェクト内の項目を表します。

注釈

ポリシー項目は、ポリシーの範囲外では存在できません。 ポリシー項目は、Microsoft Office SharePoint Server を実行中のサーバーに格納されたドキュメントに対して定義された個別の条件です。

次の例では、作業中の文書のすべてのポリシー項目の名前と説明を一覧表示します。

Sub ListPolicyItems() 
Dim objSrvPolicy As ServerPolicy 
Dim objPolicyItem As PolicyItem 
Dim strPolicyItemList As String 
 
Set objSrvPolicy = ActiveDocument.ServerPolicy 
 
For Each objPolicyItem In objSrvPolicy 
 strPolicyItemList = "Policy Item " & objPolicyItem.Name & " - " & _ 
 objPolicyItem.Description & vbCrLf 
Next 
MsgBox (strPolicyItemList) 
 
End Sub 

関連項目

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

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