Solved

Change all images to a specific size in word

Posted on 2014-07-22
3
332 Views
Last Modified: 2014-07-22
Change all images to a specific size in word

I have 1000's of images in a word file and want all to be Height : 4.64 cm and Width 4.24 cm
Any easy way to achieve this
Thanks
0
Comment
Question by:mtthompsons
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 
LVL 10

Accepted Solution

by:
Gašper Kamenšek earned 500 total points
ID: 40210954
This will help you
Sub ResizeAllImages()
''# make all images (both inline and floating)
''# 4.24 cm wide and 4.64 cm high

Dim oShp As Shape
Dim oILShp As InlineShape

For Each oShp In ActiveDocument.Shapes
    With oShp
.LockAspectRatio = msoFalse
        .Width = CentimetersToPoints(4.24)
        .Height = CentimetersToPoints(4.64)
    End With
Next

For Each oILShp In ActiveDocument.InlineShapes
    With oILShp
.LockAspectRatio = msoFalse
        .Width = CentimetersToPoints(4.24)
        .Height = CentimetersToPoints(4.64)
    End With
Next
End Sub

Open in new window

0
 
LVL 10

Expert Comment

by:Gašper Kamenšek
ID: 40210982
Hi,
I changed it a bit in the previous post. Try it out now.
0

Featured Post

Transaction Monitoring Vs. Real User Monitoring

Synthetic Transaction Monitoring Vs. Real User Monitoring: When To Use Each Approach? In this article, we will discuss two major monitoring approaches: Synthetic Transaction and Real User Monitoring.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Deploying a Microsoft Access application in a Citrix environment is not difficult but takes a few steps. However, Citrix system people are often of little help, as they typically know next to nothing about Access. The script provided here will take …
A quick Powershell script I wrote to find old program installations and check versions of a specific file across the network.
The viewer will learn how to dynamically set the form action using jQuery.
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …

734 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question