Tag オブジェクト (Publisher)

図形、図形範囲、ページ、または文書に対して作成できるタグまたはユーザー設定プロパティを表します。 各 Tag オブジェクトには、ユーザー設定プロパティの名前およびそのプロパティの値が含まれます。 タグ オブジェクトは、 Tags コレクションのメンバーです。

組み込みのプロパティによって表されていない属性に基づいてコレクションの特定のメンバーを選択して操作できるようにする場合は、タグを作成します。

注釈

Tag オブジェクトを取得するには、 Tags.Itemメソッドを使用 します。

Tag オブジェクトを追加するには、 Tags.Addメソッドを使用 します。

次の使用例は、作業中の文書の先頭ページにある図形の最初のタグの値が "Oval" に設定されている場合、そのページ上のすべての図形に塗りつぶしを適用します。

Sub FormatTaggedShapes() 
 Dim shp As Shape 
 With ActiveDocument.Pages(1) 
 For Each shp In .Shapes 
 If shp.Tags.Count > 0 Then 
 If shp.Tags.Item(1).Value = "Oval" Then 
 shp.Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) 
 End If 
 End If 
 Next 
 End With 
End Sub

この例では、作業中の文書内のすべての楕円にタグを追加します。

Sub TagShapes() 
 Dim shp As Shape 
 With ActiveDocument.Pages(1) 
 For Each shp In .Shapes 
 If InStr(1, shp.Name, "Oval") > 0 Then 
 shp.Tags.Add Name:="Oval", Value:="This is an oval shape." 
 End If 
 Next shp 
 End With 
End Sub

メソッド

プロパティ

関連項目

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

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