文档详情

word中图片如何统一大小.docx

发布:2021-05-08约小于1千字共5页下载文档
文本预览下载声明
操作步骤如下: 打开要统一图片大小的 Word文档,点击“工具” - “宏” - “Visual Biscal 编辑器。 2)插入 normal 工程“模块”。 3)在“模块”中粘贴下面的代码。 Sub batchResizeShape() Dim doc As Document Dim i As Integer Set doc = ActiveDocument For i = 1 To (i).ScaleHeight , msoFalse, msoScaleFromMiddle (i).ScaleWidth , msoFalse, msoScaleFromMiddle (i).Height = (i).Width = Next i End Sub 4)保存,返回你要统一图片大小的 Word文档。运行“工具” - “宏” - 宏命令 。 看一下结果,是不是你想要的统一图片大小。 我用的两张图一个大一个小, 统一后 400*300 还是很大, 放在两个页面上, 上面 是 25%的缩略图,至此实现了统一大小的目标,如果你想要其它的大小,只需按代码里的说明更改一下长宽数值即可。
显示全部
相似文档