2

我希望将 excel 工作表自动转换为 pdf 文档(我不想每天早上手动将 excel 中生成的报告打印为 pdf 文档)。现在,我想在 excel 中创建一个按钮,它将运行宏以自动生成 pdf 文档,但最终不会使用此按钮。

我也是 VB 新手,但已经阅读了 AcroEXch SDK。似乎我应该使用 AcroEXch.PDDoc.Create,但这不太正确(因为我无法指定要打印/创建为新 pdf 文档的输入文件)。

关于如何创建全新的 pdf 文件的任何想法?提前致谢。

4

3 回答 3

1

我想我找到了答案。这是工作中有人建议的一种解决方案(如果有人觉得它有用,那就太好了)。

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

于 2008-10-21T17:18:37.057 回答
0

我不确切知道您的情况以及您可以使用哪些工具,但是阅读您的描述,听起来您只是想通过单击为您转换 Excel 文件。

如果您发布了是否拥有 Adob​​o Acrobat Professional、最新版本的 Excel 或市场上可用的其他转换器,将会很有帮助。

如果您安装了 Acrobat Pro,您的办公应用程序(word、excel、outlook 等)应该已经在工具栏中有一个“转换为 PDF”按钮,结合Excel 命令行参数,它应该不会太难烹饪定期为您转换 excel 文件的 Windows 计划任务。

于 2008-10-21T23:39:30.843 回答
-1

您是否考虑过CuteFTP 或PDFCreator,两者都是免费的。我已经成功地将 PDFCreator 与 VBA 一起使用,并且听说 CuteFTP 很好。

于 2008-10-21T09:50:10.767 回答