word文档批量修改图片地方法

[手把手]word批量导入、修改图片大小和压缩图片

工作中，我们不时会需要将大量图片插入word，并对其设置统一的尺寸大小。下面请跟随我，学习批量导入、修改图片尺寸和压缩图片的方法，让你告别重复工作。

工具/原料

将所有需要导入的图片放入同一文件夹，修改文件名，使其排列顺序符合我们要求。

2. 2

打开word，依次点击：插入→图片

在弹出的窗口，“查找范围”框里找到需要插入图片所在文件夹，

方法一：选中第1张图片，按住键盘Shift键，再选中最后一张图片。

方法二：选中任意一张照片，同时按键盘“Ctrl”键和字母“A”键，全选点击“插入”

4. 4

效果如图

END

批量修改图片尺寸

1. 1

接上面的例子。

方法一：在word软件界面中依次点击：开发工具→宏

方法二：同时按键盘“Alt”键和“F8”键（后面简称Alt+F8）弹出宏创建窗口

2. 2

在宏名栏里任意输入一个宏的名字，本例中我们使用“setpicsize”点击创建

3. 3

弹出“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

4. 4

点击“Microsoft Visual Basic”窗口工具栏里的“运行”按钮（类似播放器里的播放按钮）或者按键盘“F5”键

等待一会儿……（等待时间取决于你插入图片的多少和你电脑的运算速度）……

5. 5

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

大功告成！！

END

批量压缩图片大小

1. 1

选中任意一张图片，依次点击：“格式”→“压缩图片”

2. 2

在弹出的“压缩图片”窗口里点击“选项”；

在弹出的“压缩设置”窗口里选择相应的“目标输出”；

确定。

END

注意事项

为提高效率，提前将图片排好，可在图名加前缀