在Excel工作表中創建的第一個頁面的PDF

我有以下VBA代碼在Excel文件中創建一個PDF出工作表Sheet1：在Excel工作表中創建的第一個頁面的PDF

Sub Create_PDF() 
    Sheet1.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
    ThisWorkbook.Path & "\" & "Only First Page" & ".pdf", _ 
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True 
End Sub

工作表Sheet1由超過1頁面，因此上面的代碼當前創建了一個PDF文件，其中包含所有頁面Sheet1。但是，我想要達到的那個只有第一頁顯示在PDF中。

我需要在我的代碼中更改什麼來排除Sheet1中的其他頁面？

來源

2017-05-26 Michi

您可以使用範圍功能。所以'sheet1.range（「A1：I36」）。Export ...'只需更改範圍以選擇第一頁上的所有內容 – KoderM16

一個簡單的方法是指定您的頁面1的範圍。例如，如果頁面1的範圍從A1到I 36，則添加這段代碼range("A1:I36")。見下：

Sub Create_PDF() 
Sheet1.Range("A1:I36").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
ThisWorkbook.Path & "\" & "Only First Page" & ".pdf", _ 
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True 
End Sub

有可能是一種更好的方法，但我現在不能想到它。希望別人會。

來源

2017-05-26 12:06:34 KoderM16

在Excel工作表中創建的第一個頁面的PDF

回答

相關問題