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.
Agrega un nuevo objeto Shape que representa una etiqueta de texto a la colección Shapes especificada.
Sintaxis
expresión. AddLabel (Orientación, Izquierda, Superior, Ancho, Alto)
expresión Variable que representa un objeto Shapes.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Orientation | Obligatorio | PbTextOrientation | Orientación de la etiqueta. Puede ser una de las constantes PbTextOrientation . |
| Left | Obligatorio | Variant | Posición del borde izquierdo de la forma que representa la etiqueta de texto. |
| Top | Obligatorio | Variant | Posición del borde superior de la forma que representa la etiqueta de texto. |
| Width | Obligatorio | Variant | Ancho de la forma que representa la etiqueta de texto. |
| Height | Obligatorio | Variant | Alto de la forma que representa la etiqueta de texto. |
Valor devuelto
Forma
Comentarios
Para los argumentos Left, Top, Width y Height , los valores numéricos se evalúan en puntos; Las cadenas pueden estar en cualquier unidad compatible con Microsoft Publisher (por ejemplo, "2,5 in").
Ejemplo
En el siguiente ejemplo se agrega una nueva etiqueta de texto horizontal a la primera página de la publicación activa.
Dim shpLabel As Shape
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _
(Orientation:=pbTextOrientationHorizontal, _
Left:=144, Top:=144, _
Width:=72, Height:=18)
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.