WORKAROUND
When you insert a picture from file or an object, Word (by default) places the picture or object inline with the text of your document. Unlike earlier versions of Word, there is no option for inserting your picture or object as
Float over text.
To change your picture or object to floating (text wrapping), use one of the following methods to insert your picture from a file or object as float over text:
Method 1: Set a Text Wrapping Style for Your Picture or Object
- Use the Picture From File or Object command to insert your picture or object.
- Click the picture (object). When the picture (object) is selected, it has a box with squares around it.
- On the Format menu, click Picture (or Object).
- On the Layout tab, click the type of wrapping you want, and then click OK.
Method 2: Use a Macro to Insert Your Picture As "Float Over Text"
The following macro code inserts your picture with a wrapping style of
Top and bottom, as in earlier versions of Word.
Sub InsertPicture()
With Dialogs (wdDialogInsertPicture)
.FloatOverText = True
.Show
End With
End Sub
NOTE: This macro causes Word to always insert your picture from file as
Float over text, even if you remove (delete) the macro. To restore Word back to inserting your picture from file as
In-line with text, replace your InsertPicture macro with the following:
Sub InsertPicture()
With Dialogs (wdDialogInsertPicture)
.FloatOverText = False
.Show
End With
End Sub
Method 3: Use a Macro to Insert Your Object As "Float Over Text"
The following macro code inserts your object with a wrapping style of
Top and bottom, as in earlier versions of Word.
Sub InsertObject()
With Dialogs (wdDialogInsertObject)
.Floating = True
.Update
.Show
End With
End Sub
NOTE: The use of this macro causes Word to always insert your objects as
Float over text, even if you remove (delete) the macro. To restore Word back to inserting your objects as
In-line with text, replace your InsertObject macro with the following:
Sub InsertObject()
With Dialogs (wdDialogInsertObject)
.Floating = False
.Update
.Show
End With
End Sub