All Charts the same size

		Microsoft Office Forums > Microsoft Word > Word
All Charts the same size

FAQ

Thread Tools

Display Modes

01-17-2024, 03:15 PM

Guessed

Windows 10 All Charts the same size

Office 2016

Expert

Join Date: Mar 2010

Location: Canberra/Melbourne Australia

Posts: 4,185

You can do it with a macro quite easily. Are all the charts placed inline or do they have text wrapping turned on? Are there other graphics in the document that you don't want resized?
At it's simplest the macro could be

Code:

Sub ResizeGraphics()
  Dim inShp As InlineShape
  For Each inShp In ActiveDocument.InlineShapes
    inShp.LockAspectRatio = msoTrue
    inShp.Width = CentimetersToPoints(5)
  Next inShp
End Sub

__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
change printer settings - page size not paper size	trevorc	Excel Programming	4	07-20-2020 05:10 PM
Pasting Excel Charts and Graphs into PPT 2010 - Retaining Consistent Size	pptdiva	PowerPoint	0	06-29-2017 03:21 PM
After updating linked excel charts in publisher, all charts are moved	effinglife	Publisher	0	05-23-2017 02:27 AM
Font size showing different (some superscripted??) but tools show its the same size?	mikkygee	PowerPoint	4	12-14-2015 11:21 PM
Copying excel charts into word - huge file size.	Matt.M	Word	2	04-02-2014 07:38 PM