Método Shapes.AddEmptyPictureFrame (Publisher)

Devuelve un objeto Shape que representa un marco de imagen vacío insertado en las coordenadas especificadas.

Sintaxis

expresión. AddEmptyPictureFrame (Left, Top, Width, Height)

expresión Variable que representa un objeto Shapes.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Left Obligatorio Variant Posición del borde izquierdo de la forma que representa la imagen.
Top Obligatorio Variant Posición del borde superior de la forma que representa la imagen.
Width Opcional Variant Ancho de la forma que representa la imagen. El valor predeterminado es -1, que significa que el ancho de la forma se establece automáticamente en 72 puntos si se deja en blanco este parámetro.
Height Opcional Variant Alto de la forma que representa la imagen. El valor predeterminado es -1, que significa que el alto de la forma se establece automáticamente en 54 puntos si se deja en blanco este parámetro.

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 admitida por Microsoft Publisher (por ejemplo, "1,5 in").

El marco de imagen en blanco tiene la información sobre herramientas predeterminada "Marco de imagen vacío". Esto se cambia a "Imagen" cuando se selecciona una imagen para la forma.

Ejemplo:

En este ejemplo se coloca un marco de imagen vacío en el centro de la primera página de la publicación y se gira 45 grados. La propiedad AlternativeText se establece en Marcador de posición de imagen 1 para la web.

Dim shpPlaceholder As Shape 
 
Set shpPlaceholder = _ 
 ActiveDocument.Pages(1).Shapes.AddEmptyPictureFrame( _ 
 230, 320, 150, 150) 
 
With shpPlaceholder 
 .AlternativeText = "Picture Placeholder 1" 
 .Rotation = 45 
End With 
 

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.