Word中所有图片统一大小设置方法

在撰写报告、论文或制作宣传资料时，经常需要插入多张图片。若这些图片尺寸不一，会影响整体排版美观。本文将详细介绍如何在 Microsoft Word 中将所有图片统一调整为相同大小。

方法一：手动设置（适用于少量图片）

• 选中一张图片，在“图片格式”选项卡中设置高度和宽度（如高5cm，宽8cm）。
• 复制该图片的尺寸设置：右键点击图片 → “大小和位置” → 记录高度与宽度数值。
• 依次选中其他图片，输入相同的高度和宽度值。

方法二：使用宏批量处理（推荐用于大量图片）

如果你的文档中有大量图片，可以使用 VBA 宏实现一键统一尺寸：

1. 按 Alt + F11 打开 VBA 编辑器。
2. 插入新模块（菜单：插入 → 模块）。
3. 粘贴以下代码：

   Sub ResizeAllPictures()
       Dim pic As InlineShape
       For Each pic In ActiveDocument.InlineShapes
           If pic.Type = wdInlineShapePicture Then
               pic.LockAspectRatio = msoFalse
               pic.Height = CentimetersToPoints(5)   ' 设置高度为5厘米
               pic.Width = CentimetersToPoints(8)    ' 设置宽度为8厘米
           End If
       Next pic
   End Sub
           

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

注意事项

• 建议先备份文档，以防宏操作出错。
• 若希望保持图片比例不变，请将 LockAspectRatio 设为 msoTrue，并只设置高度或宽度其一。
• 此方法仅适用于嵌入型图片（InlineShape），浮动图片需使用 Shape 对象处理。

通过以上方法，你可以快速让 Word 文档中的所有图片整齐划一，大幅提升文档的专业感与可读性。