VBA d'appliquer le style à toutes les images du mot doc
Question
est-il possible d'appliquer un style ou du moins donner une bordure mince à toutes les images d'un document Word 2013 à l'aide de VBA?
La solution
Les suivants doivent fonctionner,
Dim pic As InlineShape
For Each pic In ActiveDocument.InlineShapes
pic.Borders.OutsideLineStyle = wdLineStyleSingle
pic.Borders.OutsideLineWidth = wdLineWidth050pt
Next
Autres conseils
Si vous souhaitez appliquer un style aux images, utilisez cette macro:
Sub set_image_to_figure_style()
Dim pic As InlineShape
For Each pic In ActiveDocument.InlineShapes
pic.Select
Selection.Style = ActiveDocument.Styles("Figure")
Next
End Sub
Licencié sous: CC-BY-SA avec attribution
Non affilié à StackOverflow