【办公-WORD】vba 统一改变word文档所有的图片大小 然后导出成PDF

原创 2016年06月01日 10:08:23

如果您有一推图片且大小一样,想用word转成PDF,那么我推荐您使用VBA来调整图片大小,先给word设置 “页面布局-页边距”全部设置成0,再调整成合适的纸张大小,然后启动VBA 【Alt +F11】,粘贴如下代码,修改代码中自定义的宽高(如果不知道,那么先设置一张看看那个宽高最合适),最后 【F5】运行代码等待统一修改完成即可。

Sub 改变图片大小()
Dim iSha As InlineShape
For Each iSha In ActiveDocument.InlineShapes
    If iSha.Type = wdInlineShapePicture Then
       iSha.LockAspectRatio = msoFalse '不锁定纵横比
            iSha.Width = CentimetersToPoints(22#)  '宽22#CM
                iSha.Height = CentimetersToPoints(28.91) '高28.91CM
                End If
                Next
End Sub


版权声明:本文为博主原创文章,未经博主允许不得转载。

运行宏来自动压缩word中插入的所有图片

扫描的图片插入word中太大了,影响网络传输,手工压缩的话,又不大方便,想了下办法,通过宏来操作比较可行,网上找了些代码,测试通过。   Sub CompressPic() '压缩word中嵌入的...

word 批量修改文档中的图片大小

应用场景: 将PPT所有幻灯片导出保存为图片,然后,把所有图片都插入到word中, 然后到打印店把word文档打印出来便于平时浏览(特别是期末考试的时候), 但是,插入的图片占用面积太大导致wo...

右键统一改图片大小Vista版

  • 2009年05月12日 09:16
  • 6.13MB
  • 下载

办公软件教程 PDF如何转换成Word方法

目前国内外使用PDF文件格式作为专业资料的载体情况比较普遍,对于国内用户来说,PDF文件格式虽然能够提供较好的阅读体验,但是当用户本身需要对PDF文件内容进行编辑和引用操作的时候,受到PDF文件编辑较...

Excel vba从excel中导出表格数据和图表到新word文档

office应用程序是可以相互访问的,比如可以把excel的数据导出到word中 step1: 首先要引用word工程对象,在excelvba中依次点击 工具——》引用——》microso...

将word文档转换为图片格式的PDF

0x00 前言编写一篇文档后,往往会通过转为pdf版本后发布来避免在不同环境下格式出现混乱的情况。 但这样操作转出pdf文档可以通过普通的pdf阅读器进行文本的抓取,不能达到我们想要保护知识产权的想...

导出批注工具--用VBA脚本导出Word评审文档的所有批注

前述介绍了用VBA导出Excel批注,现在介绍用VBA导出Word批注 本文实现的是,通过单击VBA按钮,选择一个word批注文件,即可导出该word所有批注,该批注生成excel文件的格式如下: ...

怎样将图片格式的PDF文档变成word 文字识别

怎样将图片格式的PDF文档变成word? 软件有很多  但是推荐“CAJViewer”软件, 用它打开PDF文件; 再用其自带的OCR文字识别功能识别图片中的文字; 复制粘贴到Word或发送到Word...

项目中使用svg格式的字符串转换图片并把图片插入到word和pdf文档

在用Highcharts做图表展示的时候使用到的功能。提供前端页面以及Java后台对svg格式的字符串转换为具体的图片 废话不多了直接上干货 主要代码 web端 ...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:【办公-WORD】vba 统一改变word文档所有的图片大小 然后导出成PDF
举报原因:
原因补充:

(最多只允许输入30个字)