python中messagebox中如何添加图片_Word中如何批量添加给图片添加边框呢?

在Word中,如何批量添加给图片添加边框呢?本期与大家分享2个方法。

f6108ff2e33ec5ff4266b40e0358d9a5.png

第一种:常规设置法

选中图片,点击格式——图片样式——边框,选择相应的粗细,对于之后的边框,可以借用F4键来实现。

f79591f6e8adac7deea9bc75e232e64f.gif

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或者点击选项卡中运行子过程即可运行。

9ac0988da1c826b94adc3b0a105a7fa7.gif

代码说明如下图所示:

67701fc6f3dd9b34b1c02508ff1057cb.png

PS:

1、 Application.ScreenUpdating = True和 Application.ScreenUpdating = False是成对出现,表示如果屏幕更新已启用,显示的是True,否则是False,一般情况下,禁用屏幕更新可以加快宏代码的速度。若将Application.ScreenUpdating = False语句放在前面,完成之后将相应属性设置为True即可。

2、 如果选项卡中没有开发工具,可以在自定义功能选项中找到,如下图所示:

7c4cb39dea2ae83ad27c5b83a110a3e0.png

有关批量设置边框的技巧,本期就分享到这里,若有什么问题,欢迎在下方留言。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值