Tag object (Publisher)
Représente une balise ou une propriété personnalisée que vous pouvez créer pour une forme, une plage de formes, une page ou une composition. Chaque objet Tag contient le nom d'une propriété personnalisée et une valeur pour cette propriété. Objets Tag sont membres des balises collection.
Créez une balise lorsque vous souhaitez être en mesure de travailler de façon sélective avec certains membres d'une collection, basé sur un attribut qui n'est pas encore représenté par une propriété prédéfinie.
Utilisez la méthode Tags.Item pour renvoyer un objet Tag .
Utilisez la méthode Tags.Add pour ajouter un objet Tag .
Cet exemple remplit toutes les formes sur la première page de la composition active si la première balise de la forme a la valeur 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
Cet exemple ajoute une balise à toutes les formes ovales dans la composition active.
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
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.