WORD文档编辑如何快速批量编辑图片？

1、打开WORD文档编辑页面。

2、选择菜单栏里的视图-宏-查看宏-命名（批量编辑图片大小）-新建宏

3、在宏的编辑页面里输入代码。

Sub 批量编辑图片大小()

Dim Shap As InlineShape
For Each Shap In ActiveDocument.InlineShapes
If Shap.Type = wdInlineShapePicture Then
Shap.LockAspectRatio = msoFalse '不锁定纵横比
Shap.Width = CentimetersToPoints(9) '9CM
Shap.Height = CentimetersToPoints(9) '9CM
End If
Next
End Sub

4、进行调试，调试OK后，选择文件-保存。

5、关闭编辑页面，选择宏-查看宏-运行，运行后所有图片一次转变为设定大小。