怎么将word文档中的图片统一尺寸?

您所在的位置:网站首页 如何调整word中图片的大小 怎么将word文档中的图片统一尺寸?

怎么将word文档中的图片统一尺寸?

2023-05-14 17:34| 来源: 网络整理| 查看: 265

word中插入的图片一张一张手工调整图片至合适的大小非常费事。可以通过编写宏代码来一次性完成自动调整所有图片的大小!!!一起来看看怎么操作的吧~第一步:打开含有要编辑图片的word,快捷键:Alt+F8 调出宏窗口,输入宏名称:批量设置图片格式,点击创建。

第二步:将下方的代码复制粘贴到编辑栏里,简单的编辑图片的宽和高,只要在 picheight = picwidth = 输入想要的数值,就可以了。

第三步:运行(点击绿色三角形),运行完可看编辑后的效果。第四步:保存。小编把代码放在下面方便大家可以快速完成操作:代码如下(如果要注释掉某内容,使其不产生作用,在内容前面输单引号)Sub 批量设置图片格式() ' 批量设置图片格式 宏 '定义变量 Dim picwidth Dim picheight On Error Resume Next '忽略错误 '按照固定大小缩放 picheight = 10 '单位厘米,可修改 picwidth = 14.58 '单位厘米,可修改 ''类型1:嵌入式图形 InlineShapes类型图片 For Each Shape In ActiveDocument.InlineShapes 'msoFalse是不锁定纵横比 Shape.LockAspectRatio = msoFalse '按照固定大小缩放 Shape.Height = picheight * 28.35 '设置图片高度为 10cm (1cm等于28.35px) Shape.Width = picwidth * 28.35 '设置图片宽度8cm Next ''类型2:非嵌入式图形,Shapes类型图片 For Each Shape In ActiveDocument.Shapes 'msoFalse是不锁定纵横比 Shape.LockAspectRatio = msoFalse '按照固定大小缩放 Shape.Height = picheight * 28.35 '设置图片高度为 10cm (1cm等于28.35px) Shape.Width = picwidth * 28.35 '设置图片宽度8cm Next End Sub看完上面的操作,是不是也没有想象中的那么难呢?赶紧收藏起来吧,下次再遇到这样的问题就可以拿出来用啦~觉得有用就点个赞吧~想要更加系统地学习Office,可以看看秋叶家的爆款好书《秒懂Excel/Word/PPT》。

书本印刷很清晰,看起来很舒适,看了几天,内容非常丰富,作为新手也很容易上手,有基础的,可以查缺补漏,提高效率,完全可以当做速查手册。用WPS比较多的可以看下面这本,特别适合做WPS字典工具,需要的时候查一下,按着解决方案操作就搞定了。 全彩印刷,截图也很清晰 ,有详细的文字+图片步骤图,视频教程,太良心了。

原文作者:安妮爱学习原文出处:知乎原文链接:安妮爱学习:怎么将word文档中的图片统一尺寸?

除了上述问题我还整理了其他Word常见问题的解决方案:

有没有好的免费的word模板网站啊。排版文章用的?Word 有哪些神奇的功能?Word 有什么技巧,让你相见恨晚?word怎么在数学公式后面加序号?如何把图片中的表格转换为word的表格?


【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3