Question

我想从excel文件中的一组页面创建PDF。页面是210 - 218，我已经有以下代码：

Private Sub CommandButton1_Click()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="PDF example.pdf", _
quality:=xlQualityStandard, IncludeDocProperties:=True, _
ignoreprintareas:=False, openafterpublish:=True
End Sub

目前将整张纸打印为pdf。我知道我应该在PageSetup中包含一些内容，但是如何使用页面，没有任何线索：S。

Answer 1

尝试使用下面提到的代码，

Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.ActivePrinter = "CutePDF Writer on CPW2:" 'printer name
ActiveWindow.SelectedSheets.PrintOut From:=210, To:=218, Copies:=1, Collate _
:=True, IgnorePrintAreas:=False

谢谢

使用printsetup创建PDF（页码）

1 个答案: