wps表格中如何快速调整图片大小一致。

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

材料/工具

Word

方法

现在Word中有三张大小不一的图片

点击“视图”选项

找到“宏”

点击“查看宏”

输入宏的名字，新建宏，我这里名字为“压缩”

接着会弹出这个窗口

弹出“Microsoft Visual Basic”窗口，复制下面的代码到代码窗口里的End Sub哪一行前面：
Dim n '图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocumen360新知t.InlineShapes也区降难.Count 'InlineShapes 类型 图片
ActiveDocument.InlineShapes(n).Height = 5 * 28.35 '设置图片高度为 5cm （1cm等于28.35px）
ActiveDocument.InlineShapes(n).Width = 4 * 28.35 '设置图片宽度 4cm
Next n
'其中图片本例中图片尺寸为5cm和4cm

代码粘贴好后点击箭头指出的运行按钮，标题栏会出现运行中的提示，提示消失后关闭窗口

看，大小统一啦