problems converting inline picture to floating

[dcurren]

Found this on microsoft's site.

SYMPTOMS
In Microsoft Word 2000, when you attempt to record a macro
that inserts a picture and changes its formatting, the
text-wrapping option that normally allows you to convert a
picture from inline to floating is unavailable.
WORKAROUND
To work around this behavior, follow these steps:
Create a new document in Word 2000.
On the Tools menu, point to Macro, and then click Record
New Macro.
In the Record Macro dialog box, type a name for your macro
and click OK.
On the Insert menu, point to Picture, and then insert a
picture.
Press SHIFT+BACKSPACE to select the picture.
On the Edit menu, click Cut to remove the graphic.
On the Edit menu, click Paste Special.
In the Paste Special dialog box, click Picture, and then
click OK.
Select the picture.
On the Format menu, click Picture.
Click the Layout tab. You are now able to select a
floating format.
STATUS
Microsoft has confirmed that this is a problem in the
Microsoft products that are listed at the beginning of
this article.
--------------------- end ---------------------------------

Unfortunately, this still is not fixed in OfficeXP and
this workaround does not work with OfficeXP.

Have any of the gurus in this newsgroup figured out a
trick to make this work? Thanks

 

[Harold]

An alternative approach could be to convert the object.
When you insert a picture by default it is an InlineShape
(in line with text). When the picture is float then it is
considered to be a member of the Shapes collection.
The syntax would be:
activedocument.inlineshapes(x).ConvertToShape
then set the use this line to set the layout type.
ActiveDocument.Shapes(1).WrapFormat.Type = wdWrapSquare
Harold