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.