New Method
Inserts an empty, 1-inch-square Word picture object surrounded by a border. This method returns the new graphic as an InlineShape object.
expression**.New(Range)**
expression Required. An expression that returns an InlineShapes object.
Range Required Range object. The location of the new graphic.
Example
This example inserts a new, empty picture in the active document and applies a shadow border around the picture.
Dim ishapeNew As InlineShape
Set ishapeNew = _
ActiveDocument.InlineShapes.New(Range:=Selection.Range)
ishapeNew.Borders.Shadow = True
ActiveDocument.ActiveWindow.View.ShowFieldCodes = False
Applies to | InlineShapes Collection Object