您现在的位置: 首页 > 网站导航收录 > 百科知识百科知识
Word中插入大量图片后，怎样快速调整它们的尺寸为统一的大小？
图片,大小,多个Word中插入大量图片后，怎样快速调整它们的尺寸为统一的大小？
发布时间：2016-12-08加入收藏来源：互联网点击：
问题补充： 工作中有需要在Word文档中插入大量的图片，但是这些图片的大小和比例都不一样，看起来不太美观。有没有一种方法，可以快速调整图片的尺寸为统一的大小呢？
回答于 2019-09-11 08:43:50
回答于 2019-09-11 08:43:50
首先审题，题主的需求是将WORD的图片一次性的、大量的、修改为同一尺寸。
我有两个方法，一个简便，一个批量。
一、简便方式——适用于10张以内的批量修改
首先打开预先准备了三张美图文档，哈哈
然后对其中一张图片点选右键，在弹出的菜单中点选“大小和位置”
弹出一个对话框，为了统一修改尺寸，我们去掉“锁定纵横比”前面的勾，然后在“高度和宽度”里输入需要的数值
这是第一张图片修改好了，然后用鼠标点选第二张图片（不能框选，只能点选），按F4键（重复上一次命令的快捷键），以此类推，重复点选，F4，就能把这几张照片统一修改了。
二、批量修改——适合大批量修改
有人会问，上面那个点点点的方法，还是麻烦，我要是有1000张图片怎么办？
别急，再来教大家一个批量修改方法。
首先依旧是打开三张美图文档，我们开始演示
然后点开“文件菜单”，就在wore窗口的左上角，在下拉列表中选择“选项”
在选项窗口，选择“级—将图片插入/黏贴为—四周型”
再在选项窗口，选择“快速访问工具栏—所有命令—选择多个对象—添加”
这个时候先不急，我们先将文档另存为，“保存类型选择Word97-2003文档”，为什么呢？因为我们等下就要使用“选择多个对象”工具，该工具不支持word2016以上版本，所以和我一样，使用新版本的朋友，这一步请记得另存为。
然后我们看向WORD串口左上角，红色框框里的图片，点击“选择多个对象”按钮
在弹出的窗口里，我们选择“全选”，点确定，我们第二个方法操作了这么多步，其实就是为了一次选中所有图片。（WORD不能框选图片）
好，到了这一步，我们已经框选了所有图片了，不管是两张，还是两千张，接下来一次搞定，统统搞定。
点击WORD窗口右上角，我红色框框圈起来的位置，会弹出“设置图片格式”窗口，和第一种简便方法一样，我们去掉“锁定纵横比”前面的勾，然后在“高度和宽度”里输入需要的数值。
好，搞定啦！
【补充】我用的是WORD2019版，可能和很多人的界面不一样，但是大概位置是差不多了，如果我又标识不清楚，或者说得不明白的地方，欢迎大家在评论区里帮我提供建议。
我是汪Sir，希望我的经验分享可以帮助你及每一位职场人。如果你喜欢我的回答，欢迎点赞，评论，转发。
回答于 2019-09-11 08:43:50
图文并茂的Word文档往往看起来更美观、更有说服力。在工作中经常会遇到在Word中插入图片的情况，有时甚至会一次性插入几十张图片。但是这些图片往往尺寸大小不统一，看起来并不美观。
有没有办法可以快速调整这些图片的尺寸为统一大小呢？答案是可以！
这里小雨为大家介绍两种方法。
方法一：神奇的F4键
在Word中有许许多多的快捷键，其中有一个【F4】像神一样的存在着，但是许多人并没有掌握它的用法。
F4键，被称之为重复键，最大的功能就是可以重复执行上一步的操作。合理利用F4键，对于Word中的重复操作大有好处。
首先在第一张图上右键选择“大小和位置”，取消“锁定纵横比”前面的对勾，然后将图片的高度和宽度按照自己的需求进行设置。这里为了演示效果明显，小雨统一设置成了9cm。
接下来依次选中其它的照片后直接按下【F4】键，该图片的尺寸就被快速地设置为与第1张相同的尺寸了。
方法二：利用VBA实现
上面的第一种方法没有任何技术含量，只要掌握了F4快捷键就可以操作。虽然设置图片尺寸的速度快，但后续还是需要一张一张去设置。如果Word文档中有几十张甚至上百张图片的话，操作起来还是挺费力的。
接下来小雨介绍的第二种方法，是利用VBA来实现的。使用这种方法对Word中文档的图片数量没有要求，无论有多少张图片都可以一键完成设置。
具体的操作如下：
打开需要统一设置图片尺寸的Word文档，然后按下【Alt+F11】组合键打开VBA编辑窗口。
在VBA窗口中双击左侧的“ThisDocument”打开该文档的代码编辑器，并且输入以下的内容。
Sub FormatPics()
Dim TuPian As InlineShape
For Each TuPian In ActiveDocument.InlineShapes
If TuPian.Type = wdInlineShapePicture Then
TuPian.LockAspectRatio = msoFalse '不锁定图片的宽高比
TuPian.Width = CentimetersToPoints(10) '设置图片宽度为10CM
TuPian.Height = CentimetersToPoints(8) '设置图片高度为8CM
End If
Next
End Sub
运行代码之后再返回查看Word中的图片，已经全部按照代码中设置好的尺寸大小调整好了。其中，上面代码中的宽度和高度的尺寸可以根据自己的需求任意调整。
我是【电脑手机那些事儿】的小雨，欢迎大家关注订阅，和小雨一起学习关于电脑、手机的实用软件和应用技巧。
回答于 2019-09-11 08:43:50
Word中插入大量图片后，怎样快速调整它们的尺寸为统一的大小？
上一篇：华为，小米，海尔都在往智能家居发展布局，不过你更看好哪家？
下一篇：返回列表
相关链接 |
||
| 网友回复（共有 0 条回复） |