如何在Word中批量将所有图片旋转90度
一、问题背景
在使用Word处理文档时，有时需要将所有插入的图片旋转90度，例如统一调整方向以符合版面要求。手动逐一旋转效率低下，因此需要批量操作的方法。
二、方法一：使用VBA宏
VBA（Visual Basic for Applications）是Word内置的编程工具，可以自动化处理重复任务。以下代码可将文档中所有嵌入图片旋转90度：
Sub RotateAllImages90()
Dim shp As InlineShape
For Each shp In ActiveDocument.InlineShapes
If shp.Type = wdInlineShapePicture Then
shp.Rotation = shp.Rotation + 90
End If
Next shp
End Sub操作步骤：按Alt+F11打开VBA编辑器，插入模块，粘贴代码，运行宏即可。
三、方法二：使用查找替换
Word的查找替换功能可以处理格式，但直接旋转图片需结合高级技巧。另一种思路是先选中所有图片（通过Ctrl+A全选，再按Tab键多次切换至图片对象），然后右键旋转。但对于大量图片，VBA更高效。
四、注意事项
- VBA宏需要启用宏功能，保存文档为启用宏的格式（.docm）。
- 若图片为浮动对象，需使用
Shapes集合遍历。 - 旋转后可能需调整图片位置和大小。
五、总结
通过VBA宏可以快速、准确地批量旋转Word文档中的所有图片90度，节省时间并保持一致性。