inlineshape - converttoshape

[fedum]

Hi,
I have some pictures in my worddocument. I would like to
scale, give them a position and wrap the text around. How
is this possible with a VBA program.
Thanks,
Marc

 

[Helmut Weber]

Hi,
this could be the first step:
Dim oShi As InlineShape
For Each oShi In ActiveDocument.InlineShapes
oShi.ConvertToShape
Next
This could be the next step:
Dim oSh As Shape
For Each oSh In ActiveDocument.Shapes
' whatever. Which is the real problem.
Next
Greetings from Bavaria, Germany
Helmut Weber
"red.sys" & chr$(64) & "t-online.de"
Word 97, NT4.0