Share via


Método Shapes.AddShape (PowerPoint)

Crea una autoforma. Devuelve un objeto Shape que representa la nueva autoforma.

Sintaxis

expresión. AddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

expresión Variable que representa un objeto Shapes.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Type Obligatorio MsoAutoShapeType Especifica el tipo de autoforma que se desea crear.
Left Obligatorio Single Posición, medida en puntos, del borde izquierdo de la autoforma en relación con el borde izquierdo de la diapositiva.
Top Obligatorio Single Posición, medida en puntos, del borde superior de la autoforma en relación con el borde superior de la diapositiva.
Width Obligatorio Single Ancho de la autoforma medido en puntos.
Height Obligatorio Single Alto de la autoforma medido en puntos.

Valor devuelto

Forma

Comentarios

Para cambiar el tipo de una autoforma que ha agregado, establezca la propiedad AutoShapeType.

Ejemplo:

En este ejemplo se agrega un rectángulo a myDocument.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddShape Type:=msoShapeRectangle, _ 
    Left:=50, Top:=50, Width:=100, Height:=200

Consulte también

Objeto Shapes

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.