Results 1 to 3 of 3

Thread: shapes (2003)

  1. #1
    3 Star Lounger
    Join Date
    Aug 2002
    Location
    milton keynes, Buckinghamshire
    Posts
    252
    Thanks
    0
    Thanked 0 Times in 0 Posts

    shapes (2003)

    I have a word document with many pictures in it. I need to re-size all the pictures so that they are identical, but bigger than they currently are

    I recorded a macro from within word and it referred to the currently selected picture as selection.inlineshapes(1)....
    I then tried to write a macro that would refer to each shape in turn and re-size it to standard dimensions. However I cannot find the correct syntax that will allow me to refer to each picture in turn.

    Can somebody please assist with some code that will allow me to access the properties of each of the pictures in turn

    Thanks

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: shapes (2003)

    You can use a loop like this:
    <code>
    Dim shp As InlineShape
    For Each shp In ActiveDocument.InlineShapes
    With shp
    .Width = ...
    .Height = ...
    End With
    Next shp</code>

  3. #3
    3 Star Lounger
    Join Date
    Aug 2002
    Location
    milton keynes, Buckinghamshire
    Posts
    252
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: shapes (2003)

    Thanks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •