如何批量调整word的图片大小

2024-12-31 23:23:29

推荐回答（5个）

回答1：

Word如何批量调整图片大小？

回答2：

分析：由于Word不能像excel一样多选图片，所以不能多选图片后统一缩放，所以考虑可以重复多次一样动作的宏功能：

打开视图-宏-输入一个名字-创建

2.输入以下代码，注意替换内有的内容和尺寸不是下面的5cm可以直接更改。

Sub FormatPics()

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

3.宏-运行，可以直接批量缩放图片尺寸，左边为最终效果图。

回答3：

分析：由于Word不能像excel一样多选图片，所以不能多选图片后统一缩放，所以考虑可以重复多次一样动作的宏功能：
打开视图-宏-输入一个名字-创建

2.输入以下代码，注意替换内有的内容和尺寸不是下面的5cm可以直接更改。
Sub FormatPics()
Dim iSha As InlineShape
For Each iSha In ActiveDocument.InlineShapes
If iSha.Type = wdInlineShapePicture Then
iSha.LockAspectRatio = msoFalse '不锁定纵横比
iSha.Width = CentimetersToPoints(5) '宽5CM
iSha.Height = CentimetersToPoints(5) '高5CM
End If
Next
End Sub

3.宏-运行，可以直接批量缩放图片尺寸，左边为最终效果图。

回答4：

Word如何批量调整图片的大小？这个视频告诉你！

回答5：

Word如何批量更改图片尺寸？这个视频告诉你怎么操作，让你轻松上手。