Hi =?Utf-8?B?TWluZHk=?=,
Hello, I imported a PowerPoint presentation into Word in a notes next to
slide format. Unfortunately after it imports, the slides are small. is
there anyway to adjust several images in a document in one step and not
having to do each one individually?
This little macro will resize all the "InlineShapes" in the document (I'm
assuming that's what the pictures of the slides are, but you'll have to
watch out if there are other things that are getting "caught" by it). You
also need to set the Width and Height measurements you want to have.
Sub ResizeInlineShapes()
Dim ils as Word.InlineShape
For each ils in ActiveDocument.InlineShapes
ils.Width = InchesToPoints(0.00)
ils.Height = InchesToPoints(0.00)
Next
End Sub
Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 17 2005)
http://www.word.mvps.org
This reply is posted in the Newsgroup; please post any follow question or
reply in the newsgroup and not by e-mail
