VBA Word Resizing Picture

[dprayner]

Hi people. I was wondering if anyone know the simplest commands to resize an image in the body of a Word Document.
I know you can go into the settings manually and select Format Picture --> Size --> Height. I want the picture to be at 100%. Thank you, DAVE

 

[fumei]

ASssuming it is int first in the InlineShapes collection:

With ActiveDocument.InlineShapes(1)
    .ScaleHeight = 100
    .ScaleWidth = 100
End With

Gerry

 

[dprayner]

Thank you. It looks like that will do the trick. DAVE

 

[dprayner]

Hi Gerry. I am getting a Run-time error '5941': The requested member of the collection doesn't exist. Any suggestions? DAVE

 

[dprayner]

Hi Gerry. I had the code in the wrong place. I changed the .InlineShapes() from1 to 0 also. Seems to work great. Thanks, DAVE

 

[fumei]

Well you DO have to be using the correct index number....

Gerry

 

[dprayner]

Of course. I was just unfamiliar with the command.

 

[fumei]

Oh, sorry, I certainly was not intending to be critical in any way.

Gerry