Excel教程下载和软件下载中心,Microsoft技术社区联盟成员,全球极具影响力的Excel门户,Office技术培训社区
广东快乐十分实时开奖

Word实现多种要求批量插入图片

2014-09-22  作者:ExcelHome  阅读:次

下载文档://t.cn/zRq0VBb ,启用并运行Word宏,批量插入图片后可以实现如下效果:
1、可以将图片的名称显示在图片下方;
2、图片的宽度大小可按要求任意设置(修改宏代码里的相关数值),实现批量等比例缩放。具体操作方法件如下动画演示:



宏代码如下
Sub setpicsize() '设置图片大小
Dim n '图片个数
On Error Resume Next '忽略错误
For n = 1 To ActiveDocument.InlineShapes.Count  'InlineShapes类型图片
ActiveDocument.InlineShapes(n).Width = 360  '设置图片宽度 300px
Next n
For n = 1 To ActiveDocument.Shapes.Count  'Shapes类型图片
ActiveDocument.Shapes(n).Width = 360  '设置图片宽度 300px
Next n
End Sub
转载请注明来源"ExcelHome"并保留原文链接。
固定链接://www.x5was.cn/lesson/animation/Word/1384.html
分享到:
Copyright 1999 - 2017 Excel Home.All Rights Reserved.
本站特聘法律顾问:徐怀玉律师 李志群律师   沪ICP备11019229号

广东快乐十分实时开奖 www.x5was.cn 沪公网安备 31011702000001号

征信        广东快乐十分实时开奖
  • 外媒房价上涨 英国工人买不起英格兰的普通住房 2019-04-17
  • 确认过眼神 这才是我的夏日护发妙招 2019-04-17
  • 与蓝有关的10部电影,你都看过哪一部? 2019-04-15
  • 广东金林村:农民爱写诗 2019-04-13
  • Insta360为iPhone推出4K功能的Nano S相机 2019-04-13
  • 合成作战,营连长“无差别”竞技练指挥 2019-04-12
  • 山东五十万大学生浸润传统文化课堂 2019-04-12
  • 报考人员如何上传照片? 2019-04-11
  • 铲屎官的福音!狗狗洗澡神器,有它再也不用去宠物店了? 2019-04-11
  • 坐观光巴士 小小代言人带你游广州 2019-04-06
  • 你遇到了吗用户吐槽升iOS 11.4后耗电过快用户吐槽升iOS11后耗电过快-行情资讯 2019-04-06
  • 成都与诗文中的“西楼” 2019-04-03
  • 司机下班闻呼救 跳河勇救落水女(图) 2019-04-01
  • 上海合作组织秘书长阿利莫夫:“上海精神”凝聚欧亚八国 2019-04-01
  • 世界杯期间交管部门将加强路检路查--旅游频道 2019-03-26
  • 386| 520| 921| 516| 747| 532| 257| 889| 297| 936|