Word怎么批量缩小图片 Word怎么一键调整文档内所有图片大小【脚本技巧】

在IT行业这个发展更新速度很快的行业，只有不停止的学习，才不会被行业所淘汰。如果你是文章学习者，那么本文《Word怎么批量缩小图片 Word怎么一键调整文档内所有图片大小【脚本技巧】》就很适合你！本篇内容主要包括##content_title##，希望对大家的知识积累有所帮助，助力实战开发！

Word中批量缩小图片有四种方法：一、用“选择窗格”全选图片后在【图片格式】中设统一宽/高；二、运行VBA宏ResizeAllPictures重设所有嵌入图片宽度为6厘米并锁定纵横比；三、用查找替换定位浮动图片（^g）后统一设置大小；四、借助Kutools插件可视化批量调整。

如果您在Word文档中插入了多张图片，且需要统一缩小尺寸以节省页面空间或保持格式一致，则可以通过内置功能或脚本方式批量调整。以下是实现该目标的具体操作步骤：

一、使用Word内置的“选择窗格”配合格式设置批量调整

该方法无需编程，利用Word的图形对象选择与格式同步功能，适用于图片未嵌入文本框或特殊容器中的常规文档。

1、按 Ctrl + A 全选文档内容。

2、在【开始】选项卡中，点击右下角的【选择】按钮，选择【选择窗格】。

3、在右侧“选择窗格”中，按住 Shift 键并逐个单击所有以“图片”命名的对象（可识别为“Picture 1”“Picture 2”等）。

4、关闭选择窗格，切换到【图片格式】选项卡，在【大小】组中取消勾选【锁定纵横比】。

5、将【高度】或【宽度】数值修改为所需尺寸（例如设为 5 厘米），回车确认，所有选中图片将同步缩放。

二、通过VBA宏一键批量重设所有嵌入图片尺寸

该方法可精准控制所有独立图片（非文本框内、非表格单元格内嵌套图片）的高度与宽度，并支持保持原始纵横比。

1、按 Alt + F11 打开VBA编辑器。

2、在左侧项目资源管理器中，双击当前文档对应的 Normal 或 ThisDocument。

3、粘贴以下代码：

Sub ResizeAllPictures()
Dim shp As InlineShape
For Each shp In ActiveDocument.InlineShapes
  If shp.Type = wdInlineShapePicture Then
    shp.LockAspectRatio = msoTrue
    shp.Width = CentimetersToPoints(6)
  End If
Next shp
End Sub

4、关闭编辑器，返回Word，按 Alt + F8，选择宏名 ResizeAllPictures，点击【运行】。

三、使用查找替换功能定位并单独调整浮动图片

对于设置为“浮于文字上方”或“衬于文字下方”的图片（即Shape对象），需通过图形对象遍历方式处理，不能被InlineShape覆盖。

1、按 Ctrl + H 打开【查找和替换】对话框。

2、点击【更多】→【特殊格式】→ 选择【图形】，此时查找内容显示为 ^g。

3、留空【替换为】栏，点击【在全部查找结果中进行替换】，Word将高亮所有浮动图片。

4、按 Ctrl + A 全选所有高亮图片，右键选择【大小和位置】。

5、在【大小】选项卡中，输入目标高度值（如 4.5 厘米），勾选【锁定纵横比】，点击【确定】。

四、借助第三方插件“Kutools for Word”快速批量缩图

Kutools提供可视化批量图片操作面板，支持按比例缩放、统一宽高、导出重命名等扩展功能，适合高频图文排版用户。

1、安装Kutools for Word后，在Word顶部菜单栏出现【Kutools】选项卡。

2、点击【Kutools】→【图片】→【批量改变图片大小】。

3、在弹出窗口中选择【按比例缩小】，输入百分比（例如 70%）；或选择【指定尺寸】，设定统一宽度与高度。

4、勾选【应用于当前文档中所有图片】，点击【确定】立即执行。

理论要掌握，实操不能落！以上关于《Word怎么批量缩小图片 Word怎么一键调整文档内所有图片大小【脚本技巧】》的详细介绍，大家都掌握了吧！如果想要继续提升自己的能力，那么就来关注golang学习网公众号吧！