Word怎么调整多个图片大小

在使用 Microsoft Word 编辑文档时，常常需要插入多张图片。如果这些图片尺寸不一，会影响整体排版美观。本文将介绍几种高效方法，帮助你快速统一调整 Word 中多个图片的大小。

方法一：使用“格式”选项卡统一设置

• 1. 按住 Ctrl 键，依次点击每张要调整的图片，选中多张图片。
• 2. 在顶部菜单栏会出现“图片工具 - 格式”选项卡，点击进入。
• 3. 在“大小”组中，输入统一的高度或宽度值（建议只改一个，另一个会自动按比例缩放）。
• 4. 所有选中的图片将同步调整为相同尺寸。

方法二：使用宏（VBA）批量调整

如果你经常处理大量图片，可以使用 VBA 宏实现一键批量调整：

1. 按 Alt + F11 打开 VBA 编辑器。
2. 插入新模块，粘贴以下代码：

   Sub ResizeAllPictures()
       Dim shp As Shape
       Dim ilshp As InlineShape
       Dim height As Single
       Dim width As Single
       
       height = InputBox("请输入统一高度（单位：厘米）：", "高度设置", "5")
       width = InputBox("请输入统一宽度（单位：厘米）：", "宽度设置", "8")
       
       For Each ilshp In ActiveDocument.InlineShapes
           If ilshp.Type = wdInlineShapePicture Then
               ilshp.LockAspectRatio = msoTrue
               ilshp.Width = CentimetersToPoints(width)
           End If
       Next ilshp
       
       For Each shp In ActiveDocument.Shapes
           If shp.Type = msoPicture Then
               shp.LockAspectRatio = msoTrue
               shp.Width = CentimetersToPoints(width)
           End If
       Next shp
   End Sub
           

3. 关闭编辑器，返回 Word，按 Alt + F8，运行该宏并输入尺寸即可。

注意事项

• 建议勾选“锁定纵横比”，避免图片变形。
• 嵌入型图片（Inline）与浮动型图片（Floating）需分别处理，上述宏已兼容两者。
• 操作前建议先备份文档，防止误操作。

掌握这些技巧后，你就能轻松应对 Word 中多图排版问题，让文档更专业、整洁！