Inserts an empty, 1-inch-square Word picture object surrounded by a border. This method returns the new graphic as an InlineShape object.
expression Required. An expression that returns an InlineShapes object.
Range Required Range object. The location of the new graphic.
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