批量添加Word图片边框，1秒就可以完成

在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、  如果选项卡中没有开发工具，可以在自定义功能选项中找到，如下图所示：

有关批量设置边框的技巧，本期就分享到这里。

END

---

往期推荐 1. Office365/2021/2019/2016官方永久激活密钥（可绑定账号） 2.  软件库（软件下载） 3.  CorelDRAW 2021破解版下载&安装步骤 4. 电脑技巧：Win11清理C盘存储空间的八种方法 5. 解压密码：关注Office自学网公众号，回复“解压密码”获取 6. Google Earth Pro 7.3 |（谷歌地球）安装教程 7. 有了它，从此不用安装微信了！

Office自学网公众号 Office自学网客服

打开微信扫一扫，Office自学网

专注分享软件安装和视频教程，让你一号在手，办公无忧！