3

我正在尝试将工作簿的两个不同工作表中的页面导出为 1 个 PDF。

但是，我希望页面按以下顺序排列：Sheet1 中的 1 页，Sheet2 中的 5 页，Sheet1 中的 2 页。

目前我将这些导出为 3 个单独的 PDF，然后将它们合并到另一个应用程序中。

我一直在使用的代码如下：

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=sPath & quotept1filename, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, From:=1, To:=1, OpenAfterPublish:=False

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=sPath & quotept2filename, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, From:=2, To:=3, OpenAfterPublish:=False

Sheets("PPA Print Ready Quote").Select

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=sPath & optionsfilename, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, From:=1, To:=NumberOfOptions, OpenAfterPublish:=False

如何让它们按照我想要的顺序打印为一个 PDF？

4

1 回答 1

0

这似乎不是最好的方法，但我个人使用 PrimoPDF 之类的驱动程序来执行此操作。通过打印 PrimoPDF 所需的所有页面，您将获得一个 pdf 文件，其顺序与发送到标准打印机时出现的顺序相同。

它可以在这里免费下载http://www.primopdf.com/

于 2012-12-10T16:48:22.540 回答