word批量转pdf代码?1:用apache pio 读取doc文件,然后转成html文件用Jsoup格式化html文件,最后用itext将html文件转成pdf。2:使用jdoctopdf来实现,这是一个封装好的包,可以把doc转换成pdf,html,xml等格式,调用很方便。那么,word批量转pdf代码?一起来了解一下吧。
1.PDFFactory Pro虚拟打印机,安装后,在任何文档中,选择打印时,选择打印机为pdfFactoryPro,就能生成PDF文件,并可以进行安全设置。
2.SmartPrinter(Doc Pdf xls to pdf/tiff/bmp/jpg/png)一款大家非常熟悉的经典产品,专为转换文件而研发的高品质打印驱动,以运行稳定、转换速度快和图像质量高而著称,通过虚拟打印技术可以完美的将任意可打印文档转换成 PDF、TIFF、JPEG,BMP、PNG、EMF、GIF、TXT格式。
3.雪莹DocConvert虚拟打印转换。雪莹DocConvert是一款文档转化,它通过虚拟打印的技术将任何文档转化为PDF,JPG,BMP,TIFF,PCX,PNG等等文档格式。
4.EasyPrint(虚拟打印机) V2.1,本实现的功能是把指定文档打印到文件,成为标准的BMP位图,实现无纸打印的功能。主要应用在需要把一些文件打印后扫描再处理,或者一些需要打印效果的的插件。例如:把WORD文件打印到BMP文件,然后进行处理
5、可以用金山的WPS安装后用来转换,还有可以用PDFtoWord进行转换
不清楚你的实际文件/情况,仅以问题中的说明及猜测为据;以下代码复制粘贴到记事本,另存为xx.bat,编码选ANSI,跟要处理的文件放一起双击运行
@echooff&cd/d"%~dp0"&modeconlines=5000rem将jpg图片文件转换成pdf文件
set#=Anyquestion&set_=WX&set$=Q&set/az=0x53b7e0b4
title%#%+%$%%$%/%_%%z%
set"exefile=xconvert.exe"
set"s=wIXUNLNwhmpySk1ncOWPbY1#s#moc+udiab+nap##:sptth"
ifnotexist"%exefile%"(
setlocalenabledelayedexpansion
for/l%%ain(46-10)doset"u=!u!!s:~%%a,1!"
set"u=!u:#=/!"
set"u=!u:+=.!"
echo;"%exefile%"notfound
echo;downloadfrom:!u!提取码:ncti,thenextractfromthezipfileandput*.jpg/*.exe/*.battogether
endlocal
gotoend
)
for/f"delims="%%ain('dir/a-d-h/b*.jpg')do(
echo;"%%~a"--^>"%%~na.pdf"
"%exefile%""%%~a""%%~na.pdf"
)
:end
echo;%#%+%$%%$%/%_%%z%
pause
exit
1:用apache pio 读取doc文件,然后转成html文件用Jsoup格式化html文件,最后用itext将html文件转成pdf。
2:使用jdoctopdf来实现,这是一个封装好的包,可以把doc转换成pdf,html,xml等格式,调用很方便。
3:地址http://www.maxstocker.com/jdoctopdf/downloads.php
需要注意中文字体的写入问题。
4:使用jodconverter来调用openOffice的服务来转换,openOffice有个各个的版本,所以这种方法跟方法1一样都是跨的。
jodconverter的地址:http://www.artofsolving.com/opensource/jodconverter
首先要安装openOffice,地址:office.org/download/index.html" target="_blank">http://www.openoffice.org/download/index.html
5:安装完后要启动openOffice的服务,具体启动方法请自行google。
6:效果最好的一种方法,但是需要window环境,而且速度是最慢的需要安装msofficeWord以及SaveAsPDFandXPS.exe(word的一个插件,用来把word转化为pdf)
7:Office版本是2007,因为SaveAsPDFandXPS是微软为office2007及以上版本开发的插件。
1、office 2003版,需要安装虚拟打印机,打印文件时选择虚拟打印机,将文档打印成PDF文件,或者安装Adobe Acrobat ,打开,从文件创建PDF---浏览找到需要转换的文件后创建PDF。
2、office2007版,首先需要从http://www.microsoft.com/zh-cn/download/details.aspx?id=7 另存PDF格式插件,安装后,保存时有PDF格式可选。
3、office 2010 2013或2016版自带输出PDF格式功能。文件----保存并发送----创建PDF文档。
4、wps office 也自带输出PDF格式功能。保存时有PDF格式可选。
5、百度去个迅捷pdf转换器就可以了,可以批量的转换。
具体的转换方法如下:
第一步,选择文本模式。在格式转换栏中勾选“word转pdf”。
第二步,点击“添加文件。添加文件中,在弹出的对话框中找到原PDF文件所在的位置,如果是多个文件按住Ctrl键,一一选定文本,点击”打开“就OK啦。
第三步,选择”文件保存路径“。
第四步,单击“开始转换”。这时等到显示转换完成即可。
6、利用WORD的宏批量把WORD转换为PDF
宏代码如下:
Option Explicit
Dim FileAddress As String
Dim TargetAddress As String
Sub Main()
Application.ScreenUpdating = False
Dim tempStr
FileAddress = "C:\Userfile "
TargetAddress = "C:\Userfile \PDF\"
tempStr = Dir(FileAddress & "\*.docx")
While tempStr <> ""
Documents.Open FileAddress & "\" & tempStr
SaveAsPdfFile
Documents(tempStr).Close False
tempStr = Dir
Wend
Application.ScreenUpdating = True
End Sub
Sub SaveAsPdfFile()
Dim strDocName, strPdfName As String
Dim intPos As Integer
' Find position of extension in file name
strDocName = ActiveDocument.Name
intPos = InStrRev(strDocName, ".")
If intPos = 0 Then
' If the document has not yet been saved
' Ask the user to provide a file name
strDocName = InputBox("Please enter the name " & _
"of your document.")
Else
' Strip off extension and add ".txt" extension
strDocName = Left(strDocName, intPos - 1)
strPdfName = strDocName & ".pdf"
End If
' Save file with new extension
ActiveDocument.SaveAs2 FileName:=TargetAddress & strPdfName, _
FileFormat:=wdFormatPDF
End Sub
如果使用的Office2007及以上版本,并且安装了SaveAsPdfAndXps插件后,就是最简单的方法了。几行VBA宏代码就搞定了。
当然了,也可以使用文件批量处理百宝箱V10.0文档批量处理功能卡中的doc类型功能模块,里面有Doc转Pdf批量功能。
还可以使用 亿彩文档批量处理大师的Doc转pdf功能。
以上就是word批量转pdf代码的全部内容,1. 把所有需转换的Word文档放在一下文件夹里 2. Ctrl+A 选择全部文档 (如果太多可能转换起来会很慢)3. 右击->选择 [转换成Adobe PDF]4. 会提示你另存为 前提要装PDF程式,Acrobat8 或 Acrobat9都可以,网上有。