Shapes.AddShape (Word)

Adiciona uma AutoForma a um documento. Retorna um objeto Shape que representa a AutoForma e o adiciona à coleção Shapes .

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

AddShape (Type, Left, Top, Width, Height, Anchor)

Dim lngType As Long: lngType =  
Dim shpAddShape As Shape
Set shpAddShape = Selection.HeaderFooter.Shapes.AddShape(Type:=lngType, Left:=, Top:=, Width:=, Height:=)

Arguments

O seguinte argumento é opcional

Type (Long) - O tipo de forma a ser retornado. Pode ser qualquer constante MsoAutoShapeType .

Left (Single) - A posição, medida em pontos, da borda esquerda da AutoForma.

Top (Single) - A posição, medida em pontos, da borda superior da AutoForma.

Width (Single) - A largura, medida em pontos, da AutoForma.

Height (Single) - A altura, medida em pontos, da AutoForma.

Optional arguments

The following argument is optional

Anchor - Range