Compartilhar via


Método Shapes.AddShape (PowerPoint)

Cria uma AutoForma. Retorna um objeto Shape que representa a nova AutoForma.

Sintaxe

expression. AddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Type Obrigatório MsoAutoShapeType Especifica o tipo de AutoForma a ser criada.
Left Obrigatório Single A posição, medida em pontos, da borda esquerda da AutoForma em relação à borda esquerda do slide.
Top Obrigatório Single A posição, medida em pontos, da borda superior da AutoForma em relação à borda superior do slide.
Width Obrigatório Single A largura da AutoForma, medida em pontos.
Height Obrigatório Single A altura da AutoForma, medida em pontos.

Valor de retorno

Forma

Comentários

Para alterar o tipo de uma AutoForma que você tenha adicionado, defina a propriedade AutoShapeType.

Exemplo

Este exemplo adiciona um retângulo a myDocument.

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

Confira também

Objeto Shapes

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.