以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问有什么第三方dll可以帮实现word转pdf功能?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138430)

--  作者:chen37280600
--  发布时间:2019/7/31 10:09:00
--  请问有什么第三方dll可以帮实现word转pdf功能?
请问有什么第三方dll可以帮实现word转pdf功能?
--  作者:有点蓝
--  发布时间:2019/7/31 10:24:00
--  
参考:

Dim app As New MSWord.Application
try
    Dim fileName = "e:\\test.docx"
    app.Documents.Open(fileName)
    app.Documents(fileName).ExportAsFixedFormat("e:\\test.pdf", MSWord.WdExportFormat.wdExportFormatPDF)
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try

--  作者:newsun2k
--  发布时间:2019/12/18 9:29:00
--  
接楼上。
能不能指定从word的第几页到第几页转成PDF?

--  作者:有点蓝
--  发布时间:2019/12/18 9:34:00
--  
https://docs.microsoft.com/zh-cn/office/vba/api/word.document.exportasfixedformat?redirectedfrom=MSDN

app.Documents(fileName).ExportAsFixedFormat("e:\\test.pdf", MSWord.WdExportFormat.wdExportFormatPDF,false,1,MSWord.WdExportRange.wdExportFromTo,起始页码,结束页码)
[此贴子已经被作者于2019/12/18 11:57:56编辑过]

--  作者:newsun2k
--  发布时间:2019/12/18 11:48:00
--  
值不在预期的范围内。帮忙看看?
这是一个模式窗口。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:送件稿分割.rar



--  作者:有点蓝
--  发布时间:2019/12/18 11:58:00
--  
app.Documents(fileName).ExportAsFixedFormat("e:\\test.pdf", MSWord.WdExportFormat.wdExportFormatPDF,false,1MSWord.WdExportRange.wdExportFromTo,起始页码,结束页码)
--  作者:newsun2k
--  发布时间:2019/12/18 12:38:00
--  
谢谢,还有一个问题,就是文件filename如果被打开了,再执行,就会陷入一个莫名其妙的等待中,关闭了文件也不行。
何解?

--  作者:有点蓝
--  发布时间:2019/12/18 13:44:00
--  
到任务管理器里退出word进程。或者强制kill进程。类似:http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=116396&replyID=787598&skin=1
--  作者:newsun2k
--  发布时间:2019/12/18 13:52:00
--  
嗯嗯,能不能先判断一下这个word是不是已经打开了?有什么办法?
--  作者:有点蓝
--  发布时间:2019/12/18 13:56:00
--  
kill进程的用法就可以判断。