我希望将 excel 工作表自动转换为 pdf 文档(我不想每天早上手动将 excel 中生成的报告打印为 pdf 文档)。现在,我想在 excel 中创建一个按钮,它将运行宏以自动生成 pdf 文档,但最终不会使用此按钮。
我也是 VB 新手,但已经阅读了 AcroEXch SDK。似乎我应该使用 AcroEXch.PDDoc.Create,但这不太正确(因为我无法指定要打印/创建为新 pdf 文档的输入文件)。
关于如何创建全新的 pdf 文件的任何想法?提前致谢。
我想我找到了答案。这是工作中有人建议的一种解决方案(如果有人觉得它有用,那就太好了)。
AcroEXch 类(或我知道的一组方法)中没有可用的方法将非 pdf 文件转换为 pdf 文件。相反,您必须使用 pdf Distiller 首先将文件转换为 postscript,然后您可以使用 PDFDistiller 类写入 pdf。这是代码片段:
'1。打开正在转换为 pdf 的 excel:
xlReport.activate xlReport.range("a1").select
暗淡 PdfFilePath PdfFilePath = ""
暗淡 PsFilePath PsFilePath = ""
'2。将 Excel 文件打印到 postscript 文件 xlBook.activesheet.PrintOut , , 1, , "Adobe PDF on Ne01:" ,TRUE, , PsFilePath
Dim oDistiller Set oDistiller = CreateObject("PDFDistiller.PDFDistiller.1")
oDistiller.FileToPDF sPsFilePath, sPdfFilePath, ""
' 关闭 Excel - 不保存。'在 3 行下方注释了调试 xlApp.displayalerts=false xlApp.quit set xlApp=nothing
我不确切知道您的情况以及您可以使用哪些工具,但是阅读您的描述,听起来您只是想通过单击为您转换 Excel 文件。
如果您发布了是否拥有 Adobo Acrobat Professional、最新版本的 Excel 或市场上可用的其他转换器,将会很有帮助。
如果您安装了 Acrobat Pro,您的办公应用程序(word、excel、outlook 等)应该已经在工具栏中有一个“转换为 PDF”按钮,结合Excel 命令行参数,它应该不会太难烹饪定期为您转换 excel 文件的 Windows 计划任务。
您是否考虑过CuteFTP 或PDFCreator,两者都是免费的。我已经成功地将 PDFCreator 与 VBA 一起使用,并且听说 CuteFTP 很好。