发表时间:2017-05-10来源:网络
Word中将图片变成统一大小的操作技巧 Word中怎么将图片变成统一大小 准备图片,我就以5张图片为例吧。


打开word,导入图片。
插入-图片,选择图片插入,进入目录后,Ctrl+A即可选择全部。
按Alt+F8,进入宏编辑窗口。
首先输入宏名称,然后点击新建即可。

在代码窗口中输入如下代码:
Dim iSha As InlineShapeFor Each iSha In ActiveDocument.InlineShapes If iSha.Type = wdInlineShapePicture Then iSha.LockAspectRatio = msoFalse '不锁定纵横比 iSha.Width = CentimetersToPoints(9#) '宽5CM iSha.Height = CentimetersToPoints(9.2) '高5CM End If Next

点击运行,如下图:

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

皓盘云建最新版下载v9.0 安卓版
53.38MB |商务办公
ris云客移动销售系统最新版下载v1.1.25 安卓手机版
42.71M |商务办公
粤语翻译帮app下载v1.1.1 安卓版
60.01MB |生活服务
人生笔记app官方版下载v1.19.4 安卓版
125.88MB |系统工具
萝卜笔记app下载v1.1.6 安卓版
46.29MB |生活服务
贯联商户端app下载v6.1.8 安卓版
12.54MB |商务办公
jotmo笔记app下载v2.30.0 安卓版
50.06MB |系统工具
鑫钜出行共享汽车app下载v1.5.2
44.7M |生活服务
2011-02-15
2011-02-13
2011-02-12
2011-02-14
2011-02-12
2011-02-12
2011-02-15
2011-02-13
2024-05-13
2011-02-13