Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Representa una etiqueta o una propiedad personalizada que puede crear para una forma, intervalo de formas, página o publicación. Cada objeto Tag contiene el nombre de una propiedad personalizada y un valor para dicha propiedad. Objetos Tag son elementos de las etiquetas colección.
Cree una etiqueta cuando desee trabajar selectivamente con determinados miembros de una colección, basándose en un atributo que todavía no esté representado por una propiedad integrada.
Observaciones
Use el método Tags.Item para devolver un objeto Tag .
Use el método Tags.Add para agregar un objeto Tag .
Ejemplo
En este ejemplo se rellena todas las formas en la primera página de la publicación activa si la primera etiqueta de la forma tiene un valor de elipse.
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
En este ejemplo se agrega una etiqueta a todas las formas de Eclipse de la publicación activa.
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
Propiedades
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.