将excel工作表导出为PDF,以空白页的形式显示

时间:2017-01-05 22:03:55

标签: vba excel-vba excel

我正在尝试将图表工作表导出为包含170页(约2000张图表)的PDF(如果已打印)。然而,当我运行宏时,它给了我一个170页的PDF,这些都是空白的。我在工作表中设置了分页符并调整了PrintSetup,但由于工作表的大小,这似乎是一个问题。

我成功地将类似的工作表导出为具有50页图表的PDF,因此我认为这与将表单导出为PDF(如果超过50页)时使用的内存有关。我的代码片段如下:

    Sheet2.ExportAsFixedFormat _
            Type:=xlTypePDF, _
            FileName:=Fname, _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, _
            OpenAfterPublish:=True

考虑到上述问题,我想知道是否可以将电子表格导出为多个PDF,以便我可以消除此问题。这可能吗?设置工作表中的分页符,使工作表的每个页面包含9行。

1 个答案:

答案 0 :(得分:4)

ExportAsFixedFormat 包含FromTo的参数,您可以使用这些参数来限制输出的大小(因此可以避免炸掉所有可用内存)。

修改 还要确保选择了工作表:

With Sheet2
  .Select
  .ExportAsFixedFormat _
        Type:=xlTypePDF, _
        FileName:=Fname, _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End With