在日常办公中,我们经常需要对 Word 文档中的多张图片进行统一角度的旋转。然而,Word 默认不支持“批量旋转”功能,只能逐个操作。本文将介绍几种实用方法,帮助你高效完成批量旋转任务。
Ctrl 或 Shift 键,依次点击要旋转的图片名称(或直接在文档中框选多个对象)。⚠️ 注意:此方法仅适用于未被文字环绕(即“嵌入型”以外的布局方式)的对象。
通过编写简单的 VBA 脚本,可一键旋转文档中所有图片指定角度:
Sub BatchRotatePictures()
Dim shp As Shape
Dim angle As Single
angle = InputBox("请输入旋转角度(正数为顺时针):", "批量旋转", 90)
For Each shp In ActiveDocument.Shapes
If shp.Type = msoPicture Then
shp.Rotation = shp.Rotation + angle
End If
Next shp
MsgBox "已完成批量旋转!", vbInformation
End Sub
使用步骤:
Alt + F11 打开 VBA 编辑器。Alt + F8,运行 BatchRotatePictures 宏。Shapes 集合访问,需先改为“浮于文字上方”等版式。