我们在运用word制作文档时，为了美化页面，希望在页面外加一个边框，或图案。那么word如何实现的呢?以下是小编给大家整理的在Word中为整个文档插入边框的方法，希望能帮到你!在Word中为整个文档插入边框的具体方法步骤1、打开要添加页面边框的文档;2、点击菜单中的“格式”，执......
批量添加Word图片边框，1秒就可以完成
word教程
2022-01-07 22:08:20
在Word中，如何批量添加给图片添加边框呢？本期Word小编与大家分享2个方法。
第一种：常规设置法
选中图片，点击格式——图片样式——边框，选择相应的粗细，对于之后的边框，可以借用F4键来实现。
PS：遇到图片数量不多的，可以用这种方法，若多则建议用第二种。
第二种：VBA法
点击开发工具——VBA——插入——模块，之后在输入以下代码：
Sub 图片边框()
Dim tupian As InlineShape
Application.ScreenUpdating = True
For Each tupian In ActiveDocument.InlineShapes
With tupian.Borders
.OutsideLineStyle = wdLineStyleSingle
.OutsideColorIndex = wdDarkBlue
.OutsideLineWidth = wdLineWidth150pt
End With
Next
Application.ScreenUpdating = False
End Sub
随后按F5或者点击选项卡中运行子过程即可运行。
代码说明如下图所示：
PS：
1、 Application.ScreenUpdating = True和 Application.ScreenUpdating = False是成对出现，表示如果屏幕更新已启用，显示的是True，否则是False，一般情况下，禁用屏幕更新可以加快宏代码的速度。若将Application.ScreenUpdating = False语句放在前面，完成之后将相应属性设置为True即可。
2、 如果选项卡中没有开发工具，可以在自定义功能选项中找到，如下图所示：
有关批量设置边框的技巧，本期就分享到这里
相关文章