Word一次性修改图片大小的方法

在日常办公或撰写报告时，我们经常需要在Word文档中插入多张图片。然而，这些图片往往尺寸不一，影响整体排版美观。本文将介绍一种高效方法，帮助你在Word中一次性批量修改所有图片的大小。

适用版本

本方法适用于 Microsoft Word 2010、2013、2016、2019、2021 及 Office 365（Microsoft 365）等主流版本。

操作步骤

1. 打开你的Word文档，确保所有需要调整大小的图片已插入。
2. 按 Ctrl + A 全选文档内容（或手动框选包含图片的部分）。
3. 按下 Alt + F11 打开VBA编辑器（若未启用开发者选项，请先在“文件 > 选项 > 自定义功能区”中勾选“开发工具”）。
4. 在VBA窗口中，点击菜单栏的【插入】→【模块】，粘贴以下代码：

   Sub ResizeAllPictures()
       Dim pic As InlineShape
       For Each pic In ActiveDocument.InlineShapes
           If pic.Type = wdInlineShapePicture Then
               pic.LockAspectRatio = msoTrue
               pic.Width = CentimetersToPoints(10) ' 修改此处数值调整宽度（单位：厘米）
           End If
       Next pic
   End Sub
           

5. 修改代码中的 10 为你希望的图片宽度（单位：厘米），高度会按比例自动缩放。
6. 按 F5 运行宏，即可一键统一所有图片尺寸。

注意事项

• 该方法仅对“嵌入型”图片有效（即默认插入方式）。若图片为“浮于文字上方”等环绕方式，请先右键选择“环绕文字”→“嵌入型”。
• 建议操作前先备份文档，以防误操作导致格式错乱。
• 如需恢复原始尺寸，请使用Word的“撤销”功能（Ctrl + Z）。

替代方案（无宏）

如果不方便使用宏，也可手动操作：选中一张图片 → 在“图片格式”选项卡中设置宽高 → 然后依次选中其他图片并按 F4（重复上一操作），实现快速应用相同尺寸。