Word一键调整全部图片大小

在使用 Microsoft Word 编辑包含多张图片的文档（如论文、报告、宣传册）时，常常会遇到图片尺寸不统一的问题。手动一张张调整不仅耗时，还容易出错。本文将介绍几种实用方法，帮助你一键批量调整 Word 中所有图片的大小，大幅提升工作效率。

方法一：使用宏（VBA）批量调整图片大小

这是最高效的方法，适用于熟悉基础编程或愿意尝试宏的用户：

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

   Sub ResizeAllPictures()
       Dim pic As InlineShape
       Dim targetWidth As Single
       Dim targetHeight As Single
       
       ' 设置目标尺寸（单位：磅，1英寸=72磅）
       targetWidth = 300 ' 宽度
       targetHeight = 200 ' 高度
       
       For Each pic In ActiveDocument.InlineShapes
           If pic.Type = wdInlineShapePicture Then
               pic.LockAspectRatio = msoFalse
               pic.Width = targetWidth
               pic.Height = targetHeight
           End If
       Next pic
   End Sub
             

4. 关闭编辑器，返回 Word，按 Alt + F8，选择 ResizeAllPictures 并运行。

你可以根据需要修改 targetWidth 和 targetHeight 的数值。

方法二：全选图片后统一设置（适用于较新版本 Word）

• 按住 Ctrl 键，依次点击每张图片进行多选（或使用“选择窗格”批量选中）。
• 右键任一选中图片 →【大小和位置】。
• 在弹出窗口中输入统一的宽度/高度，并取消勾选“锁定纵横比”（如需强制统一尺寸）。
• 点击确定，所有选中图片将同步调整。

注意：此方法在图片数量较多时操作略繁琐，但无需代码。

小贴士

• 若希望保持图片比例，建议只固定宽度或高度，另一项由 Word 自动计算。
• 对于嵌入型以外的图片（如浮于文字上方），上述宏可能不生效，需改用 Shapes 对象处理。
• 操作前建议先备份文档，防止误操作导致格式混乱。