word 批量转为pdf代码

新建一个word，然后点击文件--选项--自定义功能区--开发工具--插入--模块--输入以下代码，然后运行，弹出对话框，选择需要转化的word所在的文件夹(将所有需要转化的word都放在一个文件夹中,然后所有的word文件会自动转为pdf，仍然在之前的文件夹中，不会覆盖掉原来的word文件。

Sub ConvertWordsToPdfs()
'Updated by Extendoffice 20181123Dim xIndex As StringDim xDlg As FileDialogDim xFolder As VariantDim xNewName As StringDim xFileName As StringSet xDlg = Application.FileDialog(msoFileDialogFolderPicker)If xDlg.Show <> -1 Then Exit SubxFolder = xDlg.SelectedItems(1) + "\"xFileName = Dir(xFolder & "*.*", vbNormal)While xFileName <> ""If ((Right(xFileName, 4)) <> ".doc" Or Right(xFileName, 4) <> ".docx") ThenxIndex = InStr(xFileName, ".") + 1xNewName = Replace(xFileName, Mid(xFileName, xIndex), "pdf")Documents.Open FileName:=xFolder & xFileName, _ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _PasswordDocument:="", PasswordTemplate:="", Revert:=False, _WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _wdOpenFormatAuto, XMLTransform:=""ActiveDocument.ExportAsFixedFormat OutputFileName:=xFolder & xNewName, _ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _BitmapMissingFonts:=True, UseISO19005_1:=FalseActiveDocument.CloseEnd IfxFileName = Dir()Wend
End Sub

word 批量转为pdf代码相关推荐

一分钟玩转RPA——word批量转pdf
大家好,我是无用兄,批量word转pdf文件我们在工作中有时会经常遇到,网上也有很多工具,有收费的也有免费的,今天我们主要介绍下如何用影刀RPA工具只需要四条指令就可以完成这个工作,而且后续的使用是完 ...
php将word转txt,PHP如何将将word文件转为pdf
PHP将word文件转为pdf的方法:首先修改[php.ini],并重启环境:然后安装微软office套件:最后配置office组件服务即可. PHP将word文件转为pdf的方法: 1.修改php. ...
java pdf 转word源码_Java 实现word模板转为pdf
1. pom相关依赖工具poi-tl (操作word文档模板) + jacob (将操作后的word模板转为pdf) com.deepoove poi-tl 1.9.1 com.jacob jaco ...
在linux环境下com.aspose.words将word文件转为pdf后乱码，window环境下不会
在linux环境下com.aspose.words将word文件转为pdf后乱码,window环境下不会乱码原因是因为在linux系统下没有中文字体,所以转换的时候乱码,需要我们手动把window系 ...
使用com.aspose.words将word模板转为PDF乱码解决方案（window下正常）
使用com.aspose.words将word模板转为PDF乱码解决方案(window下正常) 参考文章: (1)使用com.aspose.words将word模板转为PDF乱码解决方案(window ...
Word批量转PDF(内容转图片，防复制文字)
一.软件下载地址 Word批量转PDF(内容转图片,防复制文字)(2021-07-13更新)下载地址: https://download.csdn.net/download/techinged/241 ...
dotnet NPOI 将word文件转为pdf的代码
您可以使用 dotnet NPOI 库将 Word 文件转换为 PDF 文件. 以下是一个示例代码: using NPOI.XWPF.UserModel; using NPOI.XWPF.Extrac ...
将doc文件批量转为pdf文件
需要将不少doc文件转为pdf,WPS带有这种功能,但是鼠标点击次数太多以后整个人都变得很烦躁用了一下午去搜这方面的工具软件,找到若干.有一些免费,有一些试用的,但总归就找到一个真正能用,虽说生成的 ...
Java将Excel文件、Word文件转为PDF
因为要做文件在线预览 . 网上找了方法是需要调用公网微软地址传入我的文件路径 <iframe src='https://view.officeapps.live.com/op/view.aspx ...

word 批量转为pdf代码

word 批量转为pdf代码相关推荐

最新文章

热门文章