使用word批量将.docx（或者.doc）转成.pdf

1.打开word，按下alt+F11，打开Microsoft Visual Basic for Applications；

2.点击“插入”，再点击“模块”，将一下代码复制粘贴到那个文本框内；

'docx转pdf
Option Explicit
Sub docx2pdf()
Dim sEveryFile As String
Dim sSourcePath As String
Dim sNewSavePath As String
Dim CurDoc As Object
sSourcePath = "C:\files_zhang\信安2班实验\信安2班安全编程实验报告2\"
sEveryFile = Dir(sSourcePath & "*.docx")
Do While sEveryFile <> ""Set CurDoc = Documents.Open(sSourcePath & sEveryFile, , , , , , , , , , , msoFalse)sNewSavePath = VBA.Strings.Replace(sSourcePath & "PDF文件\" & sEveryFile, ".docx", ".pdf")CurDoc.SaveAs2 sNewSavePath, wdFormatPDFCurDoc.Close SaveChanges:=FalsesEveryFile = Dir
Loop
Set CurDoc = Nothing
End Sub

3.注意，第8行的sSourcePath 的值为你想要批量转的docx所在的文件目录，并且要在docx所在的同级目录下创建一个叫"PDF文件"的文件夹，这样批量转的pdf就会保存到这个"PDF文件"中。

使用word批量将.docx（或者.doc）转成.pdf相关推荐

使用java将word文档docx，doc（包含图形，文本框）完美转换成所有格式图片（pdf，png，gif，jpeg等等）
使用java将word文档docx,doc(包含图形,文本框,图片等)完美转换成所有格式图片(pdf,png,gif,jpeg等等)下文中附带代码,效果图等思路使用到的包实现代码效果图: 思路 ...
Java使用aspose.word完美实现docx转doc
Java使用aspose.word完美实现docx转doc,同时打开转后的doc文件也不会报错,处理效率高于Docx4j 一.处理逻辑 1.使用aspose先将docx字节数组转为html数组, 2. ...
Python 实现office单个文件或整个文件夹（word，ppt，excel）转换成PDF文件，并获取PDF文件页数
Python 实现office单个文件或整个文件夹(word,ppt,excel)转换成PDF文件,并获取PDF文件页数文件夹中获取需要转换的文件数,将其全部转换或可单独转换单个文件,并获取转成PD ...
word 模板生成ftl并实现转换成pdf
最近在处理doc转换成pdf的时候碰到个比较奇葩的问题,正常的doc文件转换成pdf,使用openoffice,poi,itextpdf,都能进行转换但是,我需要转换的doc是一个word模板类型的 ...
Linux下使用libreoffice把doc转换成Pdf
先安装libreoffice,然后使用命令 soffice --headless --invisible --convert-to pdf /tmp/abc.docx --outdir /tmp/ 转 ...
word操作之docx转doc出现公式变图片问题的解决方案
很多基于word的在线文档提交系统,如各类申报书提交系统经常要求上传doc格式(word 97-2003)的文件.然而目前word最常用版本的后缀名为docx,在docx转为doc时,常常会出现公式变 ...
jodconverter 2.2.2 +openoffice4.0 doc转换成pdf
一.环境 linux下安装openoffice 1.首先先下载好需要的rpm包:Apache_OpenOffice_4.0.0_Linux_x86-64_install-rpm_zh-CN.tar.g ...
word插入图片不能打印出来,转成PDF后才能打印成功
环景: word365 WPS windows 10专业版问题描述: word插入图片不能直接打印,打印发送文件秒结束,没有任何提示,换个wps打印也是一样原因分析: word格式估计有问题解决 ...
如何将DOC转换成PDF
如果将100多个带有大量链接的DOC文件转换PDF文件,应该怎么做? 利用Adobe Acrobat6.0的"从网页创建PDF"(快捷键为"Shift+Ctrl+O&qu ...

使用word批量将.docx（或者.doc）转成.pdf

使用word批量将.docx（或者.doc）转成.pdf相关推荐

最新文章

热门文章