![Word中的图片批量统一大小及同比例缩放.doc_第1页](http://file.renrendoc.com/FileRoot1/2020-1/16/58e5dacc-0f78-49fc-a9e3-981fdc8a1c28/58e5dacc-0f78-49fc-a9e3-981fdc8a1c281.gif)
![Word中的图片批量统一大小及同比例缩放.doc_第2页](http://file.renrendoc.com/FileRoot1/2020-1/16/58e5dacc-0f78-49fc-a9e3-981fdc8a1c28/58e5dacc-0f78-49fc-a9e3-981fdc8a1c282.gif)
![Word中的图片批量统一大小及同比例缩放.doc_第3页](http://file.renrendoc.com/FileRoot1/2020-1/16/58e5dacc-0f78-49fc-a9e3-981fdc8a1c28/58e5dacc-0f78-49fc-a9e3-981fdc8a1c283.gif)
![Word中的图片批量统一大小及同比例缩放.doc_第4页](http://file.renrendoc.com/FileRoot1/2020-1/16/58e5dacc-0f78-49fc-a9e3-981fdc8a1c28/58e5dacc-0f78-49fc-a9e3-981fdc8a1c284.gif)
全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
Word宏:Word中的图片批量统一大小及同比例缩放(图)有些时候,我们用Word来做一些图文混排的文档,需要正规的样式,例如图片大小一致。下面的方法就是告诉我们如何来实现很多的图片统一大小。实现代码:Subsetpicsize()设置图片大小Dimn图片个数OnErrorResumeNext忽略错误Forn=1ToActiveDocument.InlineShapes.CountInlineShapes类型图片ActiveDocument.InlineShapes(n).Height=400设置图片高度为400pxActiveDocument.InlineShapes(n).Width=300设置图片宽度300pxNextnForn=1ToActiveDocument.Shapes.CountShapes类型图片ActiveDocument.Shapes(n).Height=400设置图片高度为400pxActiveDocument.Shapes(n).Width=300设置图片宽度300pxNextnEndSubCtrl+A 全部选择 提示:你可先修改部分代码,再按运行使用方法和 Word宏:Word中英文标点符号互换-VBA源码实现(图) 中介绍的一样,把代码复制到Visual Biscal编辑器中,再回到Word界面,运行“宏”命令。操作步骤如下:1.打开要统一图片大小的Word文档,点击“工具”-“宏”-“Visual Biscal编辑器。2)插入normal工程“模块”。3)在“模块”中粘贴上面的代码。4)保存,返回你要统一图片大小的Word文档。运行“工具”-“宏”-宏命令。看一下结果,是不是你想要的统一图片大小。我用的两张图一个大一个小,统一后400*300还是很大,放在两个页面上,上面是25%的缩略图,至此实现了统一大小的目标,如果你想要其它的大小,只需按代码里的说明更改一下长宽数值即可。按比例缩放的方法和上面的是一样的,只是代码变化一下,过程就不熬述。VBA代码如下:Subsetpicsize()设置图片大小Dimn图片个数OnErrorResumeNext忽略错误Forn=1ToActiveDocument.InlineShapes.CountInlineShapes类型图片ActiveDocument.InlineShapes(n).Height=400设置图片高度为400pxActiveDocument.InlineShapes(n).Width=300设置图片宽度300pxNextnForn=1ToActiveDocument.Shapes.CountShapes类型图片ActiveDocument.Shapes(n).Height=400设置图片高度为400pxActiveDocument.Shapes(n
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 信息化教学田园风含内容课件
- 动火作业监护人安全培训试题及答案
- 第五讲策略派家庭治疗理论与方法
- 法制知识竞赛试题
- 登革热疫苗市场调研分析(2023年)
- 2024年院线发行项目可行性报告
- 河南省洛阳市栾川县2023-2024学年六年级下学期期末英语试题
- 2024年促凝血药项目可行性报告
- 2022-2023学年江西省赣州市寻乌县部编版四年级下册期末考试语文试卷
- 《水资源作业设计方案-2023-2024学年初中地理中图版北京》
- 2022-2023学年重庆市九龙坡区、綦江区八年级(下)期末数学试卷(附答案详解)
- 幼儿园大班篮球训练方案及措施
- 医疗行业网络安全
- MOOC 工业机器人现场编程-常州机电职业技术学院 中国大学慕课答案
- 人教PEP版六年级下册Unit 3 Where did you go 单元整体教学设计
- 2024-2030年中国索道缆车行业市场调研分析及投资战略咨询报告
- 2023-2024学年广西南宁市良庆区六年级下学期小升初招生语文试卷含答案
- 管理学(浙江财经大学)智慧树知到期末考试答案2024年
- 国际背景下我国农药使用及行业现状分析和发展趋势研究的开题报告
- 2024年物流相关项目营销策略方案
- 音乐主题餐厅策划书
评论
0/150
提交评论