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

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

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.宏-运行，可以直接批量缩放图片尺寸，左边为最终效果图。

word文档如何批量修改图片大小？

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

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

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.宏-运行，可以直接批量缩放图片尺寸，左边为最终效果图。

word批量插入图片及批量修改大小

操作步骤：

1、单击office---->Word选项，如图所示；

2、弹出Word选项对话框，单击高级---->剪切、复制和粘贴---->将图片插入/粘贴为后面的输入框，在弹出的选项中选择四周型，如图所示；(注：因默认为嵌入型，不能同时选中多个图片)

3、按住Ctrl键，单击图片，选中需要设成大小的多张图片；

4、单击图片工具格式选项卡右下角如图所示的标记；

5、弹出大小对话框，选择大小选项卡，去掉锁定纵横比和相对原始图片大小复选框中的对勾，在高度、宽度输入框中输入所需要的数值即可，如图所示；

word批量插入图片及批量修改大小

操作步骤：

1、单击office---->Word选项，如图所示；

2、弹出Word选项对话框，单击高级---->剪切、复制和粘贴---->将图片插入/粘贴为后面的输入框，在弹出的选项中选择四周型，如图所示；(注：因默认为嵌入型，不能同时选中多个图片)

3、按住Ctrl键，单击图片，选中需要设成大小的多张图片；

4、单击图片工具格式选项卡右下角如图所示的标记；

5、弹出大小对话框，选择大小选项卡，去掉锁定纵横比和相对原始图片大小复选框中的对勾，在高度、宽度输入框中输入所需要的数值即可，如图所示；

有什么办法能在word里批量设置插入图片大小？

你可以选中其中任意一张，把图片的大小设置为3或4厘米，然后选中剩下所有的图片，Ctrl+Y，就可以把所有的图片更改为3或4厘米，你可以试一试

word 里批量修改图片大小。

1、打开word，工具－宏－宏（或者直接按Alt+F8）进入宏的界面，如下面所示，输入一个宏名，宏名自己起，能记住就行！

2、宏名起好了，单击“创建”进入Visual Basic 编辑器，输入如下代码并保存

Sub setpicsize() '设置图片大小

Dim n '图片个数

On Error Resume Next '忽略错误

For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片

ActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400px

ActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300px

Next n

For n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片

ActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400px

ActiveDocument.Shapes(n).Width = 300 '设置图片宽度 300px

Next n

End Sub

这样就可以了！

有什么办法能在word里批量设置插入图片大小？

你可以选中其中任意一张，把图片的大小设置为3或4厘米，然后选中剩下所有的图片，Ctrl+Y，就可以把所有的图片更改为3或4厘米，你可以试一试

怎样批量设置word文档里图片大小

材料/工具：word2016

1、打开Word，在插入图片之前先做一个设置，进入【WPS文字】-【选项】

2、点击【编辑】-【将图片插入为四周型】。

3、点击工具栏中的【插入】-【图片】-【来自文件】

4、在电脑中找到要插入的图片，可以按住ctrl键批量选择多张图片。

5、按住Ctrl键，用鼠标选定所有图片。

6、选择工具栏中的【图片工具】，下方可以直接输入高度和宽度进行大小调整，因为每张比例不同，所以锁定纵横比前面的勾勾要去掉。

7、点击【图片工具】调整大小设置项右下角的小方框图标，还可以做其他形式的大小调整。

8、【布局】设置框中选择【大小】，这里高度和宽度的调整还可以根据页面的相对值来调整，即占页面的比例，这里我们输入25%

9、效果就如下图所示。

转载请注明出处51数据库 » word批量更改图片大小 word文档如何批量修改图片大小