Resize picture in VBA

A

Andy

I use Word to 'print screen' what user see on the monitor.

I can copy the screen into Clipboard, start Word, rotate
page to have it landscape orientation, adjust margins and
paste the picture from the Clipboard.

At this point the picture covers a small portion of the
page at the top-left corner of the page.

How can I resize the picture to fill the whole page?

If I record the macro I get:
ActiveDocument.Shapes("Picture 2").Select
Selection.ShapeRange.ScaleWidth 1.52, msoFalse,
msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 1.52, msoFalse,
msoScaleFromTopLeft

But I will not always know the name of the picture
("Picture 2") and since my users have different
resolution of their monitors I will not know the size of
the pasted picture, so the value 1.52 may change.

Any ideas?

---- Andy
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Publisher 2019 Format Picture window size too large to display OK button 0
Resize commentbox in VB 1
set the cursor on the second page 1
Insert Picture using Macro 10
Macro for variable picture 1
explicitly naming shapes, groups, etc, in macros for Word drawings? 7
Chop picture in VBA? 9
Making Fonts Behave When Pasting Data/Graphs As Picture From Excel 0

Top