VBA批量编辑word图片尺寸

有些环境类咨询报告需要整理大量手机照片，且还需要放入报告，word中的VBA可快速实现照片尺寸的一致。

前提：word必须安装VB（就是能够运行宏）

Sub 设置图片尺寸() '设置图片尺寸Dim n '图片个数On Error Resume Next '忽略错误For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes 类型 图片ActiveDocument.InlineShapes(n).LockAspectRatio = FalseActiveDocument.InlineShapes(n).Height = 150 '设置图片高度为 7cmActiveDocument.InlineShapes(n).Width = 200 '设置图片宽度 10cmNext nEnd Sub

VBA批量编辑word图片尺寸相关推荐

用VAB批量修改word图片尺寸
其实很简单,纪念一下,自娱自乐. Sub setpicsize() '设置图片大小Dim str As StringDim n '图片个数On Error Resume Next '忽略错误For n ...
word存为html图片有两个,如何批量保存Word图片？另存为Word多个图片的方法
如何批量保存Word图片?很多用户在发送Word文档的时候都没有附上原图的习惯,导致接收方需要使用Word文档中的图片的时候还需要一个个另存为下载,当然,这是不明智的行为,如果你曾经历过这些,一定想知 ...
VBS批量缩放Word图片
今天有朋友问我如何处理Word中大量图片的缩放问题,于是就在网上找了一些相关的资料,修改后写出了如下VBS 主要功能是批量缩放Word文档中图片,把所有图片按原高宽比缩放到A4纸的工作宽度大小(小图片 ...
python 畅玩os模块顺便批量修改个图片尺寸
目录吐槽文章介绍 OS模块简介常用功能 ▲(附)os.path 创建/删除目录/文件更改目录/文件名/位置 ▲获取路径/目录/文件名批量处理图片尺寸实现思路详细步骤安装PI ...
如何在Excel中用VBA批量生成“照相机“图片
什么?你不知道照相机是什么??那参见我这篇文章吧 Excel做数据海报需求描述目前的状况是这样的,我有1个总表,26个子表.26个子表是按照总表的某个字段拆分出来的.然后我需要生成26个子表的照相 ...
怎样批量调整word 图片大小?
这个要用到VBA的,打开你的文档后,按Alt+F11,在左边Porject下找到ThisDocument,右键插入模块,贴上下面的 Sub Macro() For Each iShape In Act ...
vba 压缩图片_1分钟批量处理100张图片，Word图片批量压缩/提取/居中统统搞定
天下苦Word久矣!Word不仅是个码字工具,还是个排版工具,而Word在排版方面经常遇到的问题,恐怕说个三天三夜都说不完! 好不容易做完了100页的活动方案,交到处女座上司那里,他告诉我:" ...
宏命令对word里的图片尺寸大小进行批量修改（按比例修改）
宏命令对word里的图片尺寸大小进行批量修改(按比例修改) Sub 批量调整图片尺寸() '锁定图片的纵横比 '设置图片大小(1cm=28.35px) SizeHeight = 22.33 * 28. ...
【超实用】python批量ppt转图片，pdf转图片，word转图片脚本，直接拿去用
前言某天我们运营在编辑后台的时候说每次上传ppt,pdf,word时都要把每个文件先导出一次图片,然后一个一个上传(png用作预览,ppt,pdf,word源文件不能直接下载的,要付费),说效率太低 ...
如何批量处理Word中的图片大小
用宏批量定位word中图片位置 word文档里面有多幅图,但图片的缩进位置不统一,有些靠右,有些居中,有些靠左等等. 能否通过编制宏一次完成调整,让所有图片靠左,或居中. 通过宏可以批量完成一 ...

VBA批量编辑word图片尺寸

VBA批量编辑word图片尺寸相关推荐

最新文章

热门文章