WORD中图片大小统一调整宏设置方法(共2页).doc

调整WORD图片为统一尺寸方法：新建宏1、打开WORD,Alt+F8调出宏编辑窗口2、在宏名中填入名称，如名称为“调整图片大小”，然后点“创建“按钮，创建新宏，将以下内容复制填入：Sub调整图片大小()调整图片大小宏Dimj计数图片个数Forj=1ToActiveDocument.InlineShapes.Count文件中图片总个数，图片类型为inlineshapesActiveDocument.InlineShapes(j).Height = 328 设置高度（28.4像素/厘米） ActiveDocument.InlineShapes(j).Width = 457 设置宽度（28.4像素/厘米）NextjEndSub复制后图像如下：然后关闭。下面运行宏即可将WORD中所有图片大小进行统一运行之后就会发现所有图片大小都一致了。