批量更改word图片大小的方法

  工作中,我们不时会需要将大量图片插入word,并对其设置统一的尺寸大小。那么下面就由小编给大家分享下批量更改word图片大小的技巧,希望能帮助到您。

  批量更改word图片大小的步骤

  步骤一:弹出宏创建窗口

批量更改word图片大小的步骤图1

  步骤二:在宏名栏里任意输入一个宏的名字,本例中我们使用“setpicsize”

  步骤三:点击创建

批量更改word图片大小的步骤图2

  步骤四:弹出“Microsoft Visual Basic”窗口,复制下面的代码到代码窗口里替换掉原有内容:

  Sub setpicsize() '设置图片大小

  Dim n '图片个数

  On Error Resume Next '忽略错误

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

  ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '设置图片高度为 5cm (1cm等于28.35px)

  ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '设置图片宽度 4cm

  Next n

  End Sub

  '其中图片本例中图片尺寸为5cm和4cm

批量更改word图片大小的步骤图3

  步骤五:点击“Microsoft Visual Basic”窗口工具栏里的“运行”按钮(类似播放器里的播放按钮)或者按键盘“F5”键

批量更改word图片大小的步骤图4

  步骤六:待标题栏上方的[正在运行]消失后,点击右上角小叉关闭“Microsoft Visual Basic”窗口。

批量更改word图片大小的步骤图5


看了“如何批量更改word的图片大小”此文的人还看了:

1.word如何批量导入、修改图片尺寸和压缩图片

2.如何批量调整word的图片大小

3.word中如何将图片统一设置大小

4.word中怎样任意调整图片大小

5.word怎么改变图片大小而且不变形

office办公软件入门基础教程 » 批量更改word图片大小的方法

本文链接:【批量更改word图片大小的方法】https://www.officeapi.cn/19117.html

OFFICE,天天学一点,进步多一点

联系我们