用户登录
用户注册

分享至

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

  • 作者: 丁坤演的好
  • 来源: 51数据库
  • 2020-04-21

分析:由于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文档如何批量修改图片大小

软件
前端设计
程序设计
Java相关