Shapes.AddShape (Word)

Adds an AutoShape to a document. Returns a Shape object that represents the AutoShape and adds it to the Shapes collection.

To change the type of an AutoShape that you've added, set the AutoShapeType property.

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

The following arguments are required:

Type (Long) - The type of shape to be returned. Can be any MsoAutoShapeType constant.

Left (Single) - The position, measured in points, of the left edge of the AutoShape.

Top (Single) - The position, measured in points, of the top edge of the AutoShape.

Width (Single) - The width, measured in points, of the AutoShape.

Height (Single) - The height, measured in points, of the AutoShape.

Optional arguments

The following argument is optional

Anchor - Range