如何让word里面的图片变成统一大小

Question

如题所述

Answer 1

　　在word排版中，如果内容有多个图片，您想把所有图片变成统一大小，图片少你可以手拖拉，但是如果是几十张上百张，累死人。
　　本经验根据作者多次辛苦的摸索和寻找，终于找到一个好方法，一劳永逸。就是使用word的宏。
　　工具/原料
　　word
　　pc
　　步骤
　　准备图片，我就以5张图片为例吧。
　　打开word，导入图片。
　　插入-图片，选择图片插入，进入目录后，Ctrl+A即可选择全部。
　　按Alt+F8，进入宏编辑窗口。
　　首先输入宏名称，然后点击新建即可。
　　在代码窗口中输入如下代码：
　　Dim iSha As InlineShapeFor Each iSha In ActiveDocument.InlineShapes If iSha.Type = wdInlineShapePicture Then iSha.LockAspectRatio = msoFalse '不锁定纵横比 iSha.Width = CentimetersToPoints(9#) '宽5CM iSha.Height = CentimetersToPoints(9.2) '高5CM End If Next
　　点击运行，
　　运行后，关闭宏编辑窗口，放心，关闭窗口后，宏还在，可以不保存。

Answer 2

全选设置图片格式