從多個表，並出口到一個單一的PDF

我讀這個解決方案，張從另一個崗位相結合，一個PDF選擇範圍：從多個表，並出口到一個單一的PDF

ThisWorkbook.Sheets(Array("Sheet1", "Sheet2")).Select 

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
"C:\tempo.pdf", Quality:= xlQualityStandard, IncludeDocProperties:=True, _ 
IgnorePrintAreas:=False, OpenAfterPublish:=True

但是對我來說，打印出整個頁面。當我組合多張紙時，如何選擇要打印的每張紙的範圍。

，如果我每個表導出到一個單一的PDF每個但我不知道如何，如果我把它們結合在一起，我可以做到這一點。

提前非常感謝

來源

2014-02-06 MerC

'1'創建一個新的片材。 '2'將不同的表格中的相關範圍導出到這張表格'3'中創建pdf。 –

是否有可能添加的範圍之間的分頁符，如果我做這種方式？ – MerC

是的。這是可能 –

這是可能通過創建一個片陣列，然後通過每個片材進行導航來選擇期望的範圍。一旦完成利用Selection.ExportAsFixedFormat類型：= xlTypePDF生成PDF

子試驗（）示例代碼：

Sub test() 
Sheets(Array("A", "B")).Select 
Sheets("A").Activate 
Range("A1:J32").Select 
Sheets("B").Activate 
Range("A6:J37").Select 
Selection.ExportAsFixedFormat Type:=xlTypePDF, _ 
Filename:=ActiveWorkbook.Path & "\Test.pdf", _ 
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True 
End Sub

來源

2015-11-07 08:28:53

從多個表，並出口到一個單一的PDF

回答

相關問題