Word图片批量旋转90度

在日常办公或文档排版过程中，有时需要将Word文档中的多张图片统一旋转90度（例如从横向变为竖向）。本文将介绍几种简单有效的方法，帮助您快速完成这一操作。

方法一：使用Word内置功能手动旋转

适用于图片数量较少的情况：

• 选中一张图片，在顶部出现“图片工具”选项卡。
• 点击“格式” → “旋转” → 选择“向右旋转90°”或“向左旋转90°”。
• 重复操作每张图片即可。

方法二：使用宏（VBA）批量旋转

适用于大量图片，可一键完成：

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

Sub RotateAllPictures90()
    Dim shp As Shape
    Dim ilshp As InlineShape
    For Each shp In ActiveDocument.Shapes
        If shp.Type = msoPicture Then
            shp.Rotation = shp.Rotation + 90
        End If
    Next shp
    For Each ilshp In ActiveDocument.InlineShapes
        If ilshp.Type = wdInlineShapePicture Then
            ilshp.ConvertToShape.Rotation = ilshp.ConvertToShape.Rotation + 90
        End If
    Next ilshp
End Sub
    

运行宏后，所有图片将顺时针旋转90度。

方法三：导出图片 → 批量处理 → 重新插入

适合对图像质量要求高或需额外编辑的用户：

• 将Word文档另存为网页（.htm）格式，图片会自动导出到文件夹。
• 使用图像处理软件（如Photoshop、IrfanView、XnConvert）批量旋转图片。
• 删除原文档中的旧图，插入处理后的图片。

注意事项

• 旋转嵌入式图片（InlineShape）可能会影响文档排版，建议先备份。
• 部分Word版本对宏支持有限，请确保启用宏功能。