‘壹’ word 里怎么批量修改图片大小
1、打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示,输入一个宏名,宏名自己起,能记住就行!x0dx0a2、宏名起好了,单击“创建”进入Visual Basic 编辑器,输入如下代码并保存x0dx0aSub setpicsize() '设置图片大小x0dx0aDim n '图片个数x0dx0aOn Error Resume Next '忽略错误x0dx0aFor n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片x0dx0aActiveDocument.InlineShapes(n).Height = 400 '设置图片高度为 400pxx0dx0aActiveDocument.InlineShapes(n).Width = 300 '设置图片宽度 300pxx0dx0aNext nx0dx0aFor n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片x0dx0aActiveDocument.Shapes(n).Height = 400 '设置图片高度为 400pxx0dx0aActiveDocument.Shapes(n).Width = 300 '设置图片宽度 300pxx0dx0aNext nx0dx0aEnd Subx0dx0a这样就可以了!
‘贰’ Word怎样批量修改图片大小
Word怎样批量修改图片大小
Word批量修改图片大小要怎么批量修改?很多朋友在使用word的时候不知道如何批量修改图片大小,下面就教大家word批量修改图片大小方法,不会的朋友收藏下吧,以备不时之需!
固定长宽方法:
步骤一、打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示,输入一个宏名,宏名自己起,能记住就行!
步骤二、宏名起好了,单击“创建”进入Visual Basic 编辑器,输入如下代码并保存
Sub setpicsize() 设置图片大小
Dim n 图片个数
On Error Resume Next 忽略错误
Forn = 1 ToActiveDocument.InlineShapes.Count InlineShapes类型图片
ActiveDocument.InlineShapes(n).Height = 400 设置图片高度为 400px
ActiveDocument.InlineShapes(n).Width = 300 设置图片宽度 300px
Nextn
Forn = 1 ToActiveDocument.Shapes.Count Shapes类型图片
ActiveDocument.Shapes(n).Height = 400 设置图片高度为 400px
ActiveDocument.Shapes(n).Width = 300 设置图片宽度 300px
Nextn
End Sub
步骤三、返回word,工具-宏-宏(或者直接按Alt+F8),再次进入宏的界面,选择刚才编辑好的.宏,并单击“运行”按钮,就可以了!(图片多时,可能会花一些时间)
按比例缩放方法
这部分要说的是把word中的所有图片按比例缩放!
具体操作同上,只是代码部分稍做修改,代码如下:
Sub setpicsize() 设置图片大小
Dim n 图片个数
Dimpicwidth
Dimpicheight
On Error Resume Next 忽略错误
For n = 1 ToActiveDocument.InlineShapes.Count InlineShapes类型图片
picheight = ActiveDocument.InlineShapes(n).Height
picwidth = ActiveDocument.InlineShapes(n).Width
ActiveDocument.InlineShapes(n).Height = picheight * 1.1 设置高度为1.1倍
ActiveDocument.InlineShapes(n).Width = picwidth * 1.1 设置宽度为1.1倍
Nextn
For n = 1 To ActiveDocument.Shapes.Count Shapes类型图片
picheight = ActiveDocument.Shapes(n).Height
picwidth = ActiveDocument.Shapes(n).Width
ActiveDocument.Shapes(n).Height = picheight * 1.1 设置高度为1.1倍
ActiveDocument.Shapes(n).Width = picwidth * 1.1 设置宽度为1.1倍
Nextn
End Sub
若还想使所有图片居中对齐,可在循环中加入下面的语句:
ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment= wdAlignParagraphCenter
‘左对齐:wdAlignParagraphLeft
注意:这里的Shapes(InlineShapes)不仅仅是指图片,也包含其它的,自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。
Word批量修改图片大小的方法就是这样的了,这两种方法各有千秋,大家可以根据情况自行选择。 ;
‘叁’ word批量插入图片及批量修改大小
1、这里以WPS版本的Word为例。打开Word,在插入图片之前,先做一个设置,进入【WPS文字】-【选项】-【编辑】-【将图片插入为四周型】。
‘肆’ 如何批量调整word中插入的图片大小
1、要在一个文档里同一个地方一次性插入5张已经准备好放在桌面的图片。
‘伍’ word要怎么样批量处理图片大小
本视频使用联想90DWCTO1WW电脑演示,适用于Windows7系统,使用WPSoffice11.1.0.9513操作。
在使用word的时候,有时候我们会需要批量处理图片的大小,这个时候要怎么行友操作呢;
一起来学习一下吧,首先我们点击word上方工具栏中的【文件】,选择档塌槐【选项】,点击【编辑】,设置【将图片插入/粘贴为】为【四周型】,点击确定,随后我们逐个插入图片文件,随后我们按住【Ctrl】键;
同时选中这几张图片,点击上方工具栏【设置形状格式】的下三角,选择【大小】选项卡,取消衫敬【锁定纵横比】和【相对原始图片大小】前面的对勾,设置高度和宽度的绝对值大小,在这里我们设置两个数值,点击确定,即可看到4张图片大小统一了。
‘陆’ 怎么批量把word中的图片的大小都缩小
word中的图片的大小都缩小是利用word中的工具:宏功能,对图片进行宽高设置,等比例缩放操作。具体的方法如下:
1.具体操作同上:打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示;
注意事项:
1.需要注意的地方 就是注意厘米与像素的换算关系。一般情况下1厘米=28px 。这个换算关系其实可以用计算器计算出来。计算公式为图片改变之后的像素除以改变之后图片的大小厘米。
2.这里的Shapes(InlineShapes)不仅仅是指图片,也包含其它的,自选图形、任意多边形、OLE 对象、ActiveX 控件、图片等。
‘柒’ 如何批量修改word文档中图片的大小
一次性调节word所有图片方法如下:
打开WORD,在”工具“菜单下,选择”选项“命令,在”选项“窗口中,”编辑”选项卡下,将插入图片的格式选择为“四周型”。在“插入”菜单中选择“图片”/“来自文件”,在“插入图片“对话框中选择要插入的图片。
然后在“绘图”工具栏中的“添加或删除按钮”中选择“选中多个对象”,使用“选中多个对象”,将所有插入的图片全部选中。双击任意一图片,在弹出的对余雹话框中,就可以统一批量设置了,完成。
在word中,默认插入的嵌入式图片是不能批量统一设置,只有将默认修改为四周型后,才可以批差毁皮量修改图片版式或大小。
用宏命令虚差最省心:
代码1如下:
Sub setpicsize()
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
代码2如下:
Sub setpicsize()
Dim j '计数图片个数
For j = 1 To ActiveDocument.InlineShapes.Count '文件中图片总个数,图片类型为inlineshapes
ActiveDocument.InlineShapes(j).Height = 300 '设置高度10.58cm
ActiveDocument.InlineShapes(j).Width = 510 '设置宽度17.99cm
Next j
End Sub
‘捌’ word里面如何全选图片更改尺寸
word全选图片更改尺寸的具体操作步骤如下:
1、打开Word软件,找到文档设置的选项,进行基本功能的设置。
‘玖’ word插入多张图片后如何一次性设置图片大小(word2003)
材料/工具:word2003
1、打开word后,选择“页面布局”选项卡,并单击“页边距”按钮。
‘拾’ word里怎么统一调整图片大小
在WORD文档里,统一调整图片大小共有两种方法,以下为步骤说明:
工具/原料:
机械革命S3 Pro
Windows10
Word 2020
1、设置布局
打开WORD文档,点击每一张图片,单击右上角布局,修改图片为文字环绕方式。