screen shots

[nathan]

I am typing a document at the moment where i am using a
lot of screenshots. I find it a lot of hassle, as when I
try to edit the document and add in new screen shots, the
document goes haywire with screen shots dissapearing
everywhere. Is there anyway that I can set the size of the
screen shots so that as they are imported at the set size
and not the default size.
thanks

 

[Mark Tangard]

Hi Nathan,

No direct way I can think of, but you could accomplish this
with a small macro, assuming you want to resize the image
immediately upon pasting it:

Dim s As InlineShape, w As Single, h As Single
Set s = ActiveDocument.InlineShapes(ActiveDocument. _
InlineShapes.Count)
w = s.Width
h = s.Height
s.Width = InchesToPoints(4.5) ' <--use your desired width
s.Height = h * s.Width / w

For info on how to use a macro offered in a newsgroup, see
http://www.mvps.org/word/FAQs/MacrosVBA/CreateAMacro.htm