求助word帝.word2007里如何把一个文档所有图片一次性设置成同一宽度 如何将WORD文档中的图片设置成统一大小
作者&投稿:圭沸 (若有异议请与网页底部的电邮联系)
怎样在word里一次性把多张图片调整成一样的大小~
使用宏:
一,在word中按alt+f11组合键,进入VBA模式
二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块
三,把下面代码复制,粘贴进去.
四,更改数值, 改一下宽度和高度数值(10),点运行(类似播放按钮.)或f5,即可设置文档中全部图片
Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub
准备工具/材料:装有windows 10的电脑一台,Microsoft Office 家庭和学生版 2016 word软件。
1、单击开始-微软办公-微软word 2016打开一个空白的word文档。
2、单击单词工具栏的插入图片功能,将多个图片插入word文档。
3、插入word文档的图片默认为原始大小,如图所示。
4、选择任何图片,然后单击word工具栏中的“格式”。
5、单击“大小”功能区域右下角的箭头,弹出“布局”界面。在“布局”界面中,设置图片的适当大小,例如,将图片的高度设置为2厘米,宽度设置为3.56厘米,然后单击“确定”。
6、用鼠标依次选择其他图片,按F4键快速将其他图片设置为2厘米高、3.56厘米宽。
使用宏:
一,在word中按alt+f11组合键,进入VBA模式
二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块
三,把下面代码复制,粘贴进去.
四,更改数值, 改一下宽度和高度数值(10),点运行(类似播放按钮.)或f5,即可设置文档中全部图片
Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub