在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、如果选项卡中没有开发工具,可以在自定义功能选项中找到,如下图所示:
文章插图
【批量添加Word图片边框,1秒就可以完成】有关批量设置边框的技巧,本期就分享到这里
推荐阅读
- Word排版美化,这招技能一定要Get
- 掐指一算,你还不会这个Word技巧
- 千万别用Word做这6件事!
- 千万不要小看Word!用好了,可以让你的工作效率翻番
- 请不要假装会Word对齐,这些方法才是真正要掌握的
- Word文档中穿帮的镜头
- 让Word帮你自动排版,这个功能你还没用上
- Word图文左右排版还能这么做
- 让同事看傻了!这几个Word技巧太牛了!
- 天呐,在Word表格输入序号,你居然是一个个敲入……