View Single Post
  #5   Report Post  
DawnNeil DawnNeil is offline
Junior Member
 
Posts: 0
Default

Quote:
Originally Posted by stanj6769 View Post
When I insert graphics in Word 2007, I always want the graphic to be movable,
floatable. But the default setting is inline. It is annoying to have to
always change this manually every time I insert a graphic in a document. How
can I change the default setting so graphics come in as floating, not inline?
Apart from altering the default Word Option, you can choose to run a macro to change all inline pictures to floating ones.

Just create a new module and paste the following codes:

Sub ChangeInLineWithTextPicToFloatingPic()
Dim objDoc As Document
Dim objInLineShape As InlineShape
Dim objShape As Shape

Set objDoc = ActiveDocument

With objDoc
For Each objInLineShape In .InlineShapes
objInLineShape.ConvertToShape
Next objInLineShape

For Each objShape In .Shapes
objShape.Select
Selection.ShapeRange.WrapFormat.Type = wdWrapBehind
Next objShape
End With
End Sub

Running a macro will only affect the current document. To change picture wrapping style in another document, you will have to run the macro again.

For more detailed information, you can refer to this article:

https://www.datanumen.com/blogs/3-wa...word-document/

Hope that helps!

Dawn

Last edited by DawnNeil : April 20th 17 at 09:01 AM