当前位置:常识百科馆>游戏数码>电脑>

使用word将图片变成统一大小

电脑 阅读(1.01W)

在word排版中,如果内容有多个图片,您想把所有图片变成统一大小,图片少你可以手拖拉,但是如果是几十张上百张,累死人。
根据作者多次辛苦的摸索和寻找,终于找到一个好方法,一劳永逸。就是使用word的宏。

步骤

(01)准备图片,我就以5张图片为例吧。

使用word将图片变成统一大小
使用word将图片变成统一大小 第2张
使用word将图片变成统一大小 第3张
使用word将图片变成统一大小 第4张
使用word将图片变成统一大小 第5张

(02)打开word,导入图片。插入-图片,选择图片插入,进入目录后,Ctrl+A即可选择全部。

使用word将图片变成统一大小 第6张

(03)按Alt+F8,进入宏编辑窗口。首先输入宏名称,然后点击新建即可。

使用word将图片变成统一大小 第7张
使用word将图片变成统一大小 第8张
使用word将图片变成统一大小 第9张

(04)在代码窗口中输入如下代码:Dim iSha As InlineShapeFor Each iSha In neShapes If = wdInlineShapePicture Then    AspectRatio = msoFalse '不锁定纵横比        h = CentimetersToPoints(9#)  '宽5CM           ht = CentimetersToPoints(9.2) '高5CM             End If             Next

使用word将图片变成统一大小 第10张
使用word将图片变成统一大小 第11张

(05)点击运行,如下图:

使用word将图片变成统一大小 第12张

(06)运行后,关闭宏编辑窗口,放心,关闭窗口后,宏还在,可以不保存。结果如下:

使用word将图片变成统一大小 第13张