Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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
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.