How to crop multiple pictures in Word 2013

 I have multiple screenshots that I am adding to a Word 2013 document. All of the screenshots need to be cropped using the same settings on each (same dimensions) and after that, all screenshots need to be resized (enlarged). Any suggestions? Thanks!!
Answer
Answer

Use a macro.  Assuming they are inserted as inlineshapes then something like this:

Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Dim oILS As InlineShape
  For Each oILS In ActiveDocument.InlineShapes
  With oILS
    .PictureFormat.CropLeft = 100
    .PictureFormat.CropTop = 100
    .LockAspectRatio = True
    .Width = 200
  End With
  Next oILS
End Sub

Greg Maxey
***
Death smiles at us all, but all a man can do is smile back.


For more help with Word visit:
http://gregmaxey.com/word_tips.html

8 people found this reply helpful

·

Was this reply helpful?

Sorry this didn't help.

Great! Thanks for your feedback.

How satisfied are you with this reply?

Thanks for your feedback, it helps us improve the site.

How satisfied are you with this reply?

Thanks for your feedback.

 
 

Question Info


Last updated March 15, 2024 Views 4,301 Applies to: