在我们使用Word编辑时会插入大量的图片文件，当然这些图片大小一般是不一致的，通常插入到文档后都需要手动调整，如果说这些图片要调整统一大小，如何理解批量的调整大小呢？6f1office教程网
1、打开插入图片的文档，点击切换到“视图”标签，点击“宏”-查看宏6f1office教程网
6f1office教程网
2、在宏设置对话框，给这个宏起个名字，然后点击右侧的“创建”按钮6f1office教程网
6f1office教程网
3、打开VBA编辑器，用找到的代码粘贴替换默认的代码：6f1office教程网
| 16f1office教程网 26f1office教程网 36f1office教程网 46f1office教程网 56f1office教程网 66f1office教程网 76f1office教程网 86f1office教程网 | Sub SetPicSize() '设置图片大小6f1office教程网
Dim n '图片个数6f1office教程网
On Error Resume Next '忽略错误6f1office教程网
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 类型 图片6f1office教程网
ActiveDocument.InlineShapes(n).Height = 24 * 28.35 '设置图片高度为 24cm （1cm等于28.35px）6f1office教程网
ActiveDocument.InlineShapes(n).Width = 14 * 28.35 '设置图片宽度 14cm6f1office教程网
Next n6f1office教程网
End Sub6f1office教程网
猜你喜欢
版权所有 Copyright©2023 餐饮美食网 版权所有
粤ICP备15109582号
联系邮箱:187348839@qq.com
|
