欢迎来到天天文库
浏览记录
ID：51306909
大小：236.01 KB
页数：5页
时间：2020-03-10
《word中图片如何统一大小.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、操作步骤如下：1.打开要统一图片大小的Word文档，点击“工具”-“宏”-“VisualBiscal编辑器。2）插入normal工程“模块”。 3）在“模块”中粘贴下面的代码。SubbatchResizeShape()DimdocAsDocumentDimiAsIntegerSetdoc=ActiveDocumentFori=1Todoc.InlineShapes.Count'doc.InlineShapes'doc.Shapes(i).ScaleHeight0.5,msoFalse,msoScaleFromMiddle'doc.Shapes(i).
2、ScaleWidth0.5,msoFalse,msoScaleFromMiddledoc.InlineShapes(i).Height=198.15doc.InlineShapes(i).Width=264.45NextiEndSub4）保存，返回你要统一图片大小的Word文档。运行“工具”-“宏”-"宏命令"。看一下结果，是不是你想要的统一图片大小。我用的两张图一个大一个小，统一后400*300还是很大，放在两个页面上，上面是25%的缩略图，至此实现了统一大小的目标，如果你想要其它的大小，只需按代码里的说明更改一下长宽数值即可。
此文档下载收益归作者所有
