会飞的鱼

2019
技术学习交流--用心学习--用心记录!
首页 » ▇ 实例教程 » 将Word文档中的图片调整为统一大小

将Word文档中的图片调整为统一大小

一,在word中按alt+f11组合键,进入VBA模式
二,在左边的工程资源管理器中找到你的word文档,在其上右键/添加/模块
三,把下面代码复制,粘贴进去.
四,更改数值, 改一下宽度和高度数值(10),点运行(类似播放按钮.)或f5,即可设置文档中全部图片

Sub Macro()
Mywidth=10'10为图片宽度(厘米)
Myheigth=10'10为图片高度(厘米)
For Each iShape In ActiveDocument.InlineShapes
iShape.Height = 28.345 * Myheigth
iShape.Width = 28.345 * Mywidth
Next iShape
End Sub

文章如无特别注明均为原创! 作者: 祝忠键, 转载或复制请以 超链接形式 并注明出处 枫叶落
原文地址《 将Word文档中的图片调整为统一大小》发布于2012-7-19

分享到:
打赏

评论

游客

看不清楚?点图切换
  1. #2
    qq_avatar

    按照你说的这样做了  可是上面说缺少语句结束

    独钓 7年前 (2013-01-16)回复
  2. #1
    qq_avatar

    VBA麻烦了点

    GW 7年前 (2012-08-03)回复
切换注册

登录

您也可以使用第三方帐号快捷登录

切换登录

注册