Word Docのすべての画像にスタイルを適用するためのVBA
質問
VBAを使用して、すべての画像にスタイルを適用すること、または少なくともすべての画像に細い境界を与えることは可能ですか?
解決
次は機能するはずです、
Dim pic As InlineShape
For Each pic In ActiveDocument.InlineShapes
pic.Borders.OutsideLineStyle = wdLineStyleSingle
pic.Borders.OutsideLineWidth = wdLineWidth050pt
Next
. 他のヒント
イメージにスタイルを適用したい場合は、このマクロを使用します。
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
. 所属していません StackOverflow