2003等: 一,在word中按alt+f11组合键,进入VBA模式 二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块 三,把下面代码复制,粘贴进去. 四,更改数值, 改一下宽度和高度数值(10)，点运行(类似播放按钮.)或f5,即可设置文档中全部图片 Sub Macro() Mywidth=10'10为图片宽度（厘米） Myheigth=10'10为图片高度（厘米） For Each iShape In ActiveDocument.InlineShapes iShape.Height = 28.345 * Myheigth iShape.Width = 28.345 * Mywidth Next iShape End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024