Solved

Conform several graphs/charts copied into MS Word to same size and format

Posted on 2013-01-02
3
479 Views
Last Modified: 2013-01-02
Hello, I have several graphs/charts that were created in MS Excel that I've copied into a MS Word document and now need to conform all of the graphs/charts so that they are the same size (height/width) and format. Is anyone aware of a process or macro or utility that could do that for me? Thanks in advance...
0
Comment
Question by:jaguar5554
  • 2
3 Comments
 
LVL 22

Accepted Solution

by:
Flyster earned 500 total points
ID: 38738507
Try this macro. Just change the height and width values to meet your needs.
Sub FormatShapes()
Dim i, x As Integer

i = ActiveDocument.InlineShapes.Count
    For x = 1 To i
        With ActiveDocument
            .InlineShapes(x).Height = 115.2
            .InlineShapes(x).Width = 220.3
        End With
    Next x
End Sub

Open in new window

Flyster
0
 

Author Closing Comment

by:jaguar5554
ID: 38738687
That is amazing! Thank you so much!
0
 
LVL 22

Expert Comment

by:Flyster
ID: 38738783
Happy to be of service!
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

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 …
Recently Microsoft released a brand new function called CONCAT. It's supposed to replace its predecessor CONCATENATE. But how does it work? And what's new? In this article, we take a closer look at all of this - we even included an exercise file for…
This video shows where to find templates, what they are used for, and how to create and save a custom template using Microsoft Word.
The viewer will learn how to simulate a series of coin tosses with the rand() function and learn how to make these “tosses” depend on a predetermined probability. Flipping Coins in Excel: Enter =RAND() into cell A2: Recalculate the random variable…

856 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