Tag-Objekt (Publisher)
Stellt eine Marke oder eine benutzerdefinierte Eigenschaft, die Sie für eine Form, einen Formenbereich, eine Seite oder eine Publikation erstellen können. Jedes Tags -Objekt enthält den Namen einer benutzerdefinierten Eigenschaft sowie einen Wert für diese Eigenschaft. Tag -Objekte sind Mitglieder der Tags Auflistung.
Erstellen Sie ein Tag, wenn Sie möchten selektiv arbeiten mit bestimmten Member einer Auflistung, basierend auf ein Attribut, das noch nicht durch eine integrierte Eigenschaft dargestellt wird.
Verwenden Sie die Tags.Item-Methode , um ein Tag-Objekt zurückzugeben.
Verwenden Sie die Tags.Add-Methode , um ein Tag-Objekt hinzuzufügen.
In diesem Beispiel wird füllt alle Formen auf der ersten Seite der aktiven Publikation, wenn der erste Tag der Form dem Wert Oval hat.
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
Dieses Beispiel fügt ein Tag zu allen ovalen Formen in der aktiven Publikation an.
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
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.