View Single Post
 
Old 10-28-2023, 09:01 PM
RobertDany RobertDany is offline Windows 7 64bit Office 2013
Novice
 
Join Date: Jul 2021
Posts: 22
RobertDany is on a distinguished road
Post Apply Image formatting to all pictures in the word using VBA

Hi,
I have many images in the document, inline shapes, and wrapped (top and bottom)
I want to apply a border to all images (1pt) and disable the already created shadow for it.
I made this VBA, but doesn't work for wrapped shapes

Code:
Dim pic As InlineShape

For Each pic In ActiveDocument.InlineShapes
  pic.Borders.OutsideLineStyle = wdLineStyleSingle
  pic.Borders.OutsideLineWidth = wdLineWidth010pt
  pic.Shadow.Visible = False
Next
Thanks
Reply With Quote