在排版长文档时,如果文档中有许多图片同时都需要添加边框,如果一张张的手工添加边框,会非常的耗时。这时候,我们可以利用宏批量为Word文档中多张图片添加边框。 方法:点击【视图】-【宏】按钮,然后选择”查看宏“命令,打开”宏“对话框,在”宏名“文本框中输入宏的名字,这里输入”picture“,再点击”创建“按钮。打开”宏代码“对话框,粘贴如下代码: Sub Example() ? ? Dim oInlineShape As InlineShape ? ? Application.ScreenUpdating = False ? ? For Each oInlineShape In ActiveDocument.InlineShapes ? ? ? ? With oInlineShape.Borders ? ? ? ? ? ? .OutsideLineStyle = wdLineStyleSingle ? ? ? ? ? ? .OutsideColorIndex = wdColorAutomatic ? ? ? ? ? ? .OutsideLineWidth = wdLineWidth050pt ? ? ? ? End With ? ? Next ? ? Application.ScreenUpdating = True End Sub
word提供了供人们协同工作的简便方法,提高了人们的工作质量。 |
温馨提示:喜欢本站的话,请收藏一下本站!