word中批量调整照片大小教程

Word2003中批量调整图片大小的方法1、 新建一个word文档，打开2、 工具→宏→宏（或直接按Alt+F8）打开宏编辑器，如图：3、 在宏名下面的输入框中输入宏名 setpicsize，如图：4、 点击创建按键，在弹出的脚本编辑器中输入以下代码（可复制粘贴），如图：附代码：Sub setpicsize()'批量设置图片大小Dim j '自定义变量j，用以计数图片个数For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数，图片类型为InlineShapes ActiveDocument.InlineShapes(j).Height = 102.024 '设置高度 ActiveDocument.InlineShapes(j).Width = 82.4694 '设置宽度Next jEnd Sub5、 点击保存6、 回到word文档，插入你要调整大小的所有图片7、 工具→宏→宏（或直接按Alt+F8）打开宏编辑器，如图：8、 选中宏名setpicsize，点击运行，就可以将word文档中所有的图片都调整为代码中所设定的宽度和高度了。

注意：1、如要将照片调整为其它大小，只用改写代码中的高度和宽度的数据 2、厘米与像素的坦率为：1厘米=28.34像素。