WORD中图片大小统一调整宏设置方法.doc

WORD中图片大小统一调整宏设置方法.doc

《WORD中图片大小统一调整宏设置方法.doc》由会员分享，可在线阅读，更多相关《WORD中图片大小统一调整宏设置方法.doc（2页珍藏版）》请在冰点文库上搜索。

调整 WORD图片为统一尺寸方法：

新建宏

1、打开WORD,Alt+F8调出宏编辑窗口

2、在宏名中填入名称，如名称为“调整图片大小”，然后点“创建“按钮，创建新宏，将以下内容复制填入：

 Sub 调整图片大小（） '

' 调整图片大小 宏'

  Dim j '计数图片个数

 For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数，图片类型为inlineshapes

 ActiveDocument.InlineShapes（j）.Height=328'设置高度（28.4像素/厘米）

ActiveDocument.InlineShapes（j）.Width=457'设置宽度（28.4像素/厘米）

 Next j

 End Sub

复制后图像如下：

然后关闭。

下面运行宏即可将WORD中所有图片大小进行统一

运行之后就会发现所有图片大小都一致了。