Compartilhar via


Objeto Tag (Publisher)

Representa uma marca ou uma propriedade personalizada que você pode criar para uma forma, intervalo de formas, página ou publicação. Cada objeto Tag contém o nome de uma propriedade personalizada e um valor para essa propriedade. Objetos Tag são membros das marcas coleção.

Crie uma marca quando você deseja ser capaz de trabalhar seletivamente com membros específicos de uma coleção, com base em um atributo que ainda não esteja representado por uma propriedade interna.

Comentários

Use o método Tags.Item para retornar um objeto Tag .

Use o método Tags.Add para adicionar um objeto Tag .

Exemplo

Este exemplo preenche todas as formas na primeira página da publicação ativa se a marca da primeira forma tiver um valor 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

Este exemplo adiciona uma marca para todas as formas oval na publicação ativa.

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

Métodos

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.