您当前的位置:首页 > 文本与office

word使用宏定义来统一设置图片大小

时间:03-13来源:作者:点击数:

1. 首先手动拖拽将图片调到需要的格式,点击图片在格式选项中查看图片的宽高

2. 视图中点击宏新建

3. 编辑框中输入以下代码并保存,由于我只需要统一宽度,所以将统一高度的代码注释

Sub 图片格式统一()
'
' 图片格式统一 宏
'
'
 
'Myheigth = 12
Mywidth =
On Error Resume Next '忽略错误
For Each iShape In ActiveDocument.InlineShapes
'iShape.Height = 28.345 * Myheigth '设置图片高度为任意cm
iShape.Width = 28.345 * Mywidth '设置图片宽度
Next
For Each Shape In ActiveDocument.Shapes
'Shape.Height = 28.345 * Myheigth '设置图片高度为任意cm
Shape.Width = 28.345 * Mywidth '设置图片宽度
Next
 
End Sub

4. 回到宏界面,运行,done。

方便获取更多学习、工作、生活信息请关注本站微信公众号城东书院 微信服务号城东书院 微信订阅号
推荐内容
相关内容
栏目更新
栏目热门