400-685-0732

WJMonitor舆情之声

企业大数据智能舆情监测管理解决方案

全网监测海量数据按需发布监测预警

实时把握舆情动态精准追溯信息源头

获取验证码
企业采购 个人使用
当前位置: 首页 > 办公 > word > word插入图片Word实现多种要求批量插入图片

word插入图片Word实现多种要求批量插入图片

时间:2018-07-13 15:41:52

word插入图片Word实现多种要求批量插入图片,这个问题是我们很多人都很困惑的一个问题,word插入图片是我们非常常用的一个东西,也是我们工作和学习中必不可少的一个数据公式,那么具体我们要怎么做呢?下面就来看看这篇word插入图片Word实现多种要求批量插入图片的文章吧!

下载文档:http://t.cn/zRq0VBb ,启用并运行Word宏,批量插入图片后可以实现如下效果:

1、可以将图片的名称显示在图片下方;

2、图片的宽度大小可按要求任意设置(修改宏代码里的相关数值),实现批量等比例缩放。具体操作方法件如下动画演示:

word插入图片Word实现多种要求批量插入图片

宏代码如下:

Sub setpicsize() '设置图片大小

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片

ActiveDocument.InlineShapes(n).Width = 360 '设置图片宽度 300px

Next n

For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片

ActiveDocument.Shapes(n).Width = 360 '设置图片宽度 300px

Next n

End Sub

以上就是word插入图片Word实现多种要求批量插入图片全部内容了,希望大家看完后能有所启发,对自己的工作生活有所帮助,想要了解更多跟word插入图片Word实现多种要求批量插入图片相关的内容,请关注我们优词网!

word插入图片Word实现多种要求批量插入图片

分享按钮