欢迎来到天天文库
浏览记录
ID:59216248
大小:10.22 KB
页数:2页
时间:2020-09-09
《Word批量调整图片大小、纵横比宏.docx》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、Word批量调整图片大小、锁定纵横比、解除纵横比宏宏文件中图片统一大小调整为5.55cm*7.4cm,大家可以根据自己的需要调整红色字部分。Sub图片统一大小()'设置图片大小Dimn'图片个数OnErrorResumeNext'忽略错误Forn=1ToActiveDocument.InlineShapes.Count'InlineShapes类型图片ActiveDocument.InlineShapes(n).LockAspectRatio=msoFalse'解除纵横比锁定ActiveDocument.InlineShape
2、s(n).Height=5.55*28.35'设置图片高度为5.55cm(1cm等于28.35px)ActiveDocument.InlineShapes(n).Width=7.4*28.35'设置图片宽度7.4cmNextnEndSubSub图片锁定纵横比()'锁定图片纵横比Dimn'图片个数OnErrorResumeNext'忽略错误Forn=1ToActiveDocument.InlineShapes.Count'InlineShapes类型图片ActiveDocument.InlineShapes(n).LockAsp
3、ectRatio=msotrue'打开纵横比锁定NextnEndSubSub图片解除纵横比()'解除图片纵横比Dimn'图片个数OnErrorResumeNext'忽略错误Forn=1ToActiveDocument.InlineShapes.Count'InlineShapes类型图片ActiveDocument.InlineShapes(n).LockAspectRatio=msoFalse'解除纵横比锁定NextnEndSub
此文档下载收益归作者所有