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-06-23
  • 江苏淮安:创建食品安全+互联网透明共治新体系 2019-06-23
  • 【每日最陕西】NO.1449 西安幼升小反映问题是去年近3倍 上学难层出不穷 2019-06-22
  • 马刺头号球星申请换队并确定下家 波波维奇也不好使了 2019-06-17
  • 黄润中应邀出席“2017金融安全与科技高峰论坛” 2019-06-17
  • 合成作战,营连长“无差别”竞技练指挥 2019-06-16
  • 西安华大非法吸收公众存款案开庭 涉案金额23.9亿 2019-06-10
  • 习近平欢迎出席上海合作组织青岛峰会的外方领导人 2019-06-05
  • 《虢国夫人游春图》中“虢国夫人”究竟是哪位(图) 2019-06-05
  • 《红海行动》出征中美电影节 2019-06-03
  • 【专题】加油,宝贝! 2019-05-29
  • 安徽通报2018年上半年全省旅游投诉情况 2019-05-28
  • 俄罗斯电影《最后一球》定档落魄球星遇上菜鸟球队 2019-05-28
  • 艺术与人文高端讲座陈方正等名家纵论人文精神重建 2019-05-26
  • 山东男篮强援被截后巨资砸一人 豪华引援名单谁先加盟? 2019-05-26
  • 内蒙古快3走势一定牛 今日福彩3d字谜总汇 上海快3今天推荐豹子 真人龙虎斗缅甸 足彩4场进球彩历史奖金 360彩票江苏老快3遗漏 北京单场足球指数捷报网 娱乐场所建筑设计风格 广东26选5奖结果查询 湖北11选5合买 028湖南快乐十分 加拿大快乐8开奖网站 30选5走势图 14场胜负彩什么时候开奖 快乐12带线走势图