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

发布时间:2017-03-22 20:44

工作中,我们不时会需要将大量图片插入word,并对其设置统一的尺寸大小。那么下面就由小编为您分享下批量导入、修改图片尺寸和压缩图片的技巧,希望能帮助您,有需要的朋友可以来看看哦。

一、批量导入图片

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

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

步骤二:打开word,依次点击:插入→图片

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

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

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

方法二:选中任意一张照片,同时按键盘“Ctrl”键和字母“A”键,全选

点击“插入”

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

步骤四:效果如图

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

批量修改图片尺寸

步骤一:接上面的例子。

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

方法二:同时按键盘“Alt”键和“F8”键(后面简称Alt+F8)

弹出宏创建窗口

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

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

步骤三:点击创建

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

步骤四:弹出“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如何批量导入、修改图片尺寸和压缩图片

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

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

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

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

大功告成!!

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

批量压缩图片大小

步骤一:选中任意一张图片,依次点击:“格式”→“压缩图片”

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

步骤二:在弹出的“压缩图片”窗口里点击“选项”;

步骤三:在弹出的“压缩设置”窗口里选择相应的“目标输出”;

步骤四:确定。

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

word如何批量导入、修改图片尺寸和压缩图片的评论条评论