Word一键调整全部图片大小

在撰写报告、论文或制作文档时，常常会插入多张图片，但这些图片尺寸不一，影响整体排版美观。本文将教你如何在 Microsoft Word 中快速批量统一调整所有图片的大小，无需一张张手动修改。

方法一：使用宏（VBA）一键调整

这是最高效的方法，适用于 Word 桌面版（Windows/Mac）：

1. 打开你的 Word 文档。
2. 按下 Alt + F11 打开 VBA 编辑器。
3. 点击菜单栏【插入】→【模块】，粘贴以下代码：

Sub ResizeAllPictures()
    Dim pic As InlineShape
    For Each pic In ActiveDocument.InlineShapes
        If pic.Type = wdInlineShapePicture Then
            pic.LockAspectRatio = msoTrue
            pic.Width = CentimetersToPoints(10) ' 宽度设为10厘米，可修改
        End If
    Next pic
End Sub

说明：上述代码将所有内嵌图片宽度统一设为 10 厘米，高度按比例缩放。如需修改尺寸，请调整 CentimetersToPoints(10) 中的数值。

4. 关闭编辑器，返回 Word。
5. 按下 Alt + F8，选择 ResizeAllPictures，点击“运行”即可。

方法二：手动全选+统一设置（适用于少量图片）

1. 按住 Ctrl 键，依次点击每张图片进行多选。
2. 右键任意一张选中的图片 →【大小和位置】。
3. 在“大小”选项卡中设置统一的高度或宽度，并勾选“锁定纵横比”。
4. 点击“确定”，所有选中图片将同步调整。

⚠️ 注意：此方法仅适用于内嵌型图片（非“文字环绕”类型），且图片数量不宜过多。

常见问题

• 为什么有些图片没被调整？ 可能是图片采用了“浮于文字上方”等环绕方式。请先将其转换为“嵌入型”：右键图片 →【环绕文字】→【嵌入型】。
• Mac 用户能用宏吗？ 可以，但需在“安全性与隐私”中启用宏功能。