手抄报 安全手抄报 手抄报内容 手抄报图片 英语手抄报 清明节手抄报 节约用水手抄报

一键搞定WORD文档里的图片统一大小,用代码实行

时间:2024-10-15 01:52:38

1、打开新建 Microsoft Word 文档,插入所有的图片

一键搞定WORD文档里的图片统一大小,用代码实行

2、图片大小可以不一样。

一键搞定WORD文档里的图片统一大小,用代码实行

3、现在利用代码统一大小打开 工具-宏-运行宏

一键搞定WORD文档里的图片统一大小,用代码实行

4、输入宏的名称。比如:统一大小,然后点击 创建

一键搞定WORD文档里的图片统一大小,用代码实行

5、复制代码放进去Sub setpicsize() '设置图片大小Dim n '图片个数On Error Resume Next '忽略错误For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes类型图片ActiveDocument.InlineShapes(n).Height = 130 '设置图片高度为 400pxActiveDocument.InlineShapes(n).Width = 130 '设置图片宽度 130pxNext nFor n = 1 To ActiveDocument.Shapes.Count 'Shapes类型图片ActiveDocument.Shapes(n).Height = 130 '设置图片高度为 400pxActiveDocument.Shapes(n).Width = 130 '设置图片宽度 130pxNext nEnd Sub

一键搞定WORD文档里的图片统一大小,用代码实行

6、代码是可以修改统一大小的。我这里修改为130像素。改后可以直接关了。

一键搞定WORD文档里的图片统一大小,用代码实行

7、然后在word运行宏工具-宏-运行宏

一键搞定WORD文档里的图片统一大小,用代码实行

8、最后的效果

一键搞定WORD文档里的图片统一大小,用代码实行
© 2025 手抄报圈
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com