Change Width of Objects

[willr]

I am using the following steps to copy a range of cells from an Excel
document and paste them into a Word doc.

Past Special > Link > Microsoft Office Excel Worksheet Object

Would someone be able to provide me with some VBA code that could be
used as a macro to automatically re-size all of these objects in Word
to a specified width?


Thank you,
William

 

[Jezebel]

With ActiveDocument.Shapes(n)
.Width = 100
.Height = 100
End with

You'll need your own logic to work out what n should be.