Word中将图片变成统一大小的操作技巧 Word中怎么将图片变成统一

Word中将图片变成统一大小的操作技巧 Word中怎么将图片变成统一大小　准备图片，我就以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


　　点击运行，如下图：


　　运行后，关闭宏编辑窗口，放心，关闭窗口后，宏还在，可以不保存。
　　结果如下：