Ⅰ 怎样批量设置word文档里图片大小
1、首先选中任意一张图片,然后右键点击该图片,在弹出菜单中选择大小和位置菜单项。
1、word 2013版本中的图片居中为具体的例子,操作的步骤如下:
2、首先在word的主页面中选择你要居中的图片,然后鼠标右击图片,并且在弹出来的页面中选择【大小和位置】。
3、然后在弹出来的操作页面中点击【位置】。
4、最后在位置的操作页面中,将对齐方式设置为【居中】即可实现图片居中的要求了。
Ⅲ word批量修改图片大小教程:固定长宽+按比例缩放
word批量修改图片大小方法:
固定长宽方法:
1、打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示,输入一个宏名,宏名自己起,能记住就行!
2、宏名起好了,单击“创建”进入Visual
Basic
编辑器,输入如下代码并保存
Sub
setpicsize()
'设置图片大小
Dim
n
'图片个数
On
Error
Resume
Next
'忽略错误
Forn
=
1
ToActiveDocument.InlineShapes.Count
'InlineShapes类型图片
ActiveDocument.InlineShapes(n).Height
=
400
'设置图片高度为
400px
Nextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes类型图片
ActiveDocument.Shapes(n).Height
=
400
'设置图片高度为
400px
ActiveDocument.Shapes(n).Width
=
300
'设置图片宽度
300px
Nextn
End
Sub
3、返回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未保存如何恢复?word文档未保存恢复方法汇总
word文档如何画线条?word快速画出5种线条小技巧
Ⅳ 如何在word中批量修改图片大小 Word中怎么批量修改图片固定大小
如何在word中批量修改图片大小
Word中怎么批量修改图片固定大小。相信很多人都使用过电脑中的word文档功能,因为这对于很多人来说都会经常用到的,非常的具有实用性。
解决:按alt+F11。然后在project右键插入模块,然后粘贴Sub
Macro()
Mywidth
=
4.13
Myheigth
=
5.48
For
Each
iShape
In
ActiveDocument.InlineShapesiShape.Height
=
28.345
*
Myheigth
iShape.Width
=
28.345
*
Mywidth
Next
iShape
End
Sub
再按F5,就行了。
其中Mywidth
=
4.13,Myheigth
=
5.48这里的数字你自己改大小。
固定长宽方法:
1、打开word,工具-宏-宏(或者直接按Alt+F8)进入宏的界面,如下面所示,输入一个宏名,宏名自己起,能记住就行!
\
2、宏名起好了,单击“创建”进入Visual
Basic
编辑器,输入如下代码并保存Sub
setpicsize()
'设置图片大小
Dim
n
'图片个数
On
Error
Resume
Next
'忽略错误
Forn
=
1
ToActiveDocument.InlineShapes.Count
'InlineShapes类型图片ActiveDocument.InlineShapes(n).Height
=
400
'设置图片高度为
400pxActiveDocument.InlineShapes(n).Width
=
300
'设置图片宽度
300pxNextn
Forn
=
1
ToActiveDocument.Shapes.Count
'Shapes类型图片ActiveDocument.Shapes(n).Height
=
400
'设置图片高度为
400pxActiveDocument.Shapes(n).Width
=
300
'设置图片宽度
300pxNextn
End
Sub
\
3、返回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).Heightpicwidth
=
ActiveDocument.InlineShapes(n).WidthActiveDocument.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).Heightpicwidth
=
ActiveDocument.Shapes(n).WidthActiveDocument.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批量修改图片大小的方法就是这样的了,这两种方法各有千秋,大家可以根据情况自行选择哦!
Ⅳ 关于word2016图片批量设定与位置
其实很简单。点击插入图片,然后调整需要的尺寸,之后按CTrl+A进行全选然后点击居中按钮这样就可以将图片居中显示了。
Ⅵ word中如何快速让图片设置成一样大小
Word中批量设置插入图片的大小的方法如下:
1、在电脑桌面中双击Word快捷方式,或使用系统任务栏中的搜索栏搜索:word,随后点击搜索结果来打开word应用程序。
Ⅶ word中如何让批量设置让图片居中对齐
01 首先,我们点击打开word,然后点击工具栏中的插入;
02
然后我们点击图片;
03
选中我们需要插入的图片,然后点击插入;
04
插入后,我们任意点击一张图片,然后点击居中对齐;
05
效果如图,已经全部居中对齐。