Compartilhar via


Método Shapes.AddShape (Excel)

Retorna um objeto Shape que representa o novo AutoShape em uma planilha.

Sintaxe

expressão. AddShape (Tipo, Esquerda, Superior, Largura, Altura)

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 (em pontos) do canto superior esquerdo da caixa delimitadora do AutoShape em relação ao canto superior esquerdo do documento.
Top Obrigatório Single A posição (em pontos) do canto superior esquerdo da caixa delimitadora do AutoShape em relação à parte superior do documento.
Width Obrigatório Single A largura da caixa de limite da AutoForma, em pontos.
Height Obrigatório Single A altura da caixa de limite da AutoForma, em pontos.

Valor de retorno

Formato

Comentários

Para alterar o tipo de AutoShape que você adicionou, defina a propriedade AutoShapeType .

Exemplo

Este exemplo adiciona um retângulo a myDocument.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddShape msoShapeRectangle, 50, 50, 100, 200

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.