![]() |
|
|||||||
|
|
Thread Tools | Display Modes |
|
#6
|
||||
|
||||
|
The macro recorder won't provide what you need. The required macro might look like:
Code:
Sub Demo()
Application.ScreenUpdating = False
Dim i As Long
With ActiveDocument
For i = 1 To .InlineShapes.Count
With .InlineShapes(i)
If .Range.Information(wdWithInTable) = True Then
.Range.Cells(1).Width = .Width
End If
End With
Next
End With
Application.ScreenUpdating = True
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
| Tags |
| picture box, resize, word2013 |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Word template that automatically resize's and formats image layout | vikkitoria60 | Word VBA | 3 | 09-30-2015 01:16 PM |
Word 2013, changes in word document automatically apply to another word document
|
roosje | Word | 1 | 07-09-2014 12:13 PM |
Resize multiple pictures in a Word 2010 table
|
JBA479 | Word VBA | 1 | 01-24-2014 08:51 PM |
| Resize and distribute width - 2 pictures | AndyDDUK | PowerPoint | 2 | 10-10-2012 03:38 AM |
| Resize Email pictures in Outlook - Office 2007? | jonesnewton | Outlook | 0 | 05-16-2010 04:11 AM |