南城人尽 阅读:58次 时间:2019-10-28 15:45:05日常工作,不时会需要将大量图片插入word,并对其设置统一的尺寸大小,下面学习一下批量修改图片尺寸的办法,让你告别重复工作以下内容是由微蓝经验网用户发布wps表格中如何快速调整图片大小一致,希望对于用户有一定帮助,为朋友进行解决疑惑,如若想了解更多相关内容,可以向底部移动了解更多与本教程文章相关解决经验方法!
Word
现在Word中有三张大小不一的照片

单击“视图”选择项

看到“宏”

单击“查看宏”

输入宏的姓名,新建宏,我这里名字为“压缩”

接着会弹出这个窗口

弹出来“MicrosoftVisualBasic”对话框,复制下面的代码到代码窗口里的EndSub哪一行前面:
Dimn'图片个数
OnErrorResumeNext'忽略错误
Forn=1ToActiveDocument.InlineShapes.Count'InlineShapes类型图片
ActiveDocument.InlineShapes(n).Height=5*28.35'设置图片高度为5cm(1cm等于28.35px)
ActiveDocument.InlineShapes(n).Width=4*28.35'设置图片宽度4cm
Nextn
'其中图片本例中图片尺寸为5cm和4cm

代码粘贴好后点击箭头指出的运行按钮,标题栏会出现运行中的警告,提示消失后关闭窗口

看,大小统一啦

声明 未经许可,请勿转载。
© 2025 VLPOS.com 版权所有 微蓝网 ICP备案号:黑ICP备20003952号-1