码迷,mamicode.com
首页 > 其他好文 > 详细

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

时间:2018-04-23 11:03:27      阅读:259      评论:0      收藏:0      [点我收藏+]

标签:格式   lines   并保存   视图   line   ror   sha   document   设置图   

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

技术分享图片

 2. 视图中点击宏新建

技术分享图片

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

Sub 图片格式统一()
‘
‘ 图片格式统一 宏
‘
‘

Myheigth = 12
Mywidth = 14
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。

 

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

标签:格式   lines   并保存   视图   line   ror   sha   document   设置图   

原文地址:https://www.cnblogs.com/zjfjava/p/8855557.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!