1、打开WORD,Alt+F8调出宏编辑窗口2、在宏名中填入名称，如名称为“调整图片大小”，然后点“创建“按钮，创建新宏，将以下内容复制填入
：??Sub?调整图片大小()?''''?调整图片大小?宏''?Dim?j?''计数图片个数?For?j?=?1?To?ActiveDoc
ument.InlineShapes.Count?''文件中图片总个数，图片类型为inlineshapes?ActiveDocume
nt.InlineShapes(j).Height?=?328?''设置高度（28.4像素/厘米）?ActiveDocument.I
nlineShapes(j).Width?=?457?''设置宽度（28.4像素/厘米）?Next?j?End?Sub |
|
