word文档自动调节图片大小

2024-07-12 22:58| 来源: 网络整理| 查看: 265

word文档自动调节图片大小-宏制作 1. 首先创建一个空白word文档

当然也可以是任意word文档，这里方便演示，所以创建一个空白word文档。在这里插入图片描述

2. 在菜单列表找到【视图】- 【宏】

在这里插入图片描述

3. 点击宏，录制一个宏

在这里插入图片描述

4. 录制宏起个名字，然后确定

在这里插入图片描述

5. 再次打开【宏】-【停止录制】-【查看宏】

在这里插入图片描述

6. 选中刚才录制的那个宏，然后编辑

在这里插入图片描述

7. 将下面代码替换到编辑框里 Sub wordImage() ' ' wordImage 宏 word图片自动调节大小 ' ' Dim n On Error Resume Next For n = 1 To ActiveDocument.InlineShapes.Count ' ' 高宽可以根据需要调节 ' ActiveDocument.InlineShapes(n).Height = 9.26 * 28.35 ActiveDocument.InlineShapes(n).Width = 4.23 * 28.35 Next n End Sub

在这里插入图片描述

完成后，点击保存按钮，关闭退出在这里插入图片描述

8. 操作

下面我们将一些图片粘贴到文档，这时是大小不一排列的，那么我们运行一下宏，便可以让这些图片规规矩矩的排列好了。在这里插入图片描述

进行运行我们上面写的宏

【宏】-【查看宏】-【运行】在这里插入图片描述

便按照我们设置好的高宽进行排列啦，是不是很方便

在这里插入图片描述

【本文地址】

公司简介

联系我们