我有一個(gè)報(bào)告電子表格，該電子表格從數(shù)據(jù)庫中獲取一些數(shù)據(jù)并形成三頁摘要報(bào)告信息。我想從命令行自動(dòng)運(yùn)行電子表格，并讓它自動(dòng)將所有三個(gè)報(bào)告表另存為PDF文件。最初，我以為我可以在工作表上使用VBA宏通過一系列“以PDF格式打印”來執(zhí)行此操作，但是這需要一個(gè)中間交互對話框來指定輸出文件名。然后我發(fā)現(xiàn)我可以將其另存為pdf，并且宏可以設(shè)置輸出文件名。但是，這將創(chuàng)建三個(gè)單獨(dú)的文件，然后我必須稍后在外部將它們放在一起以合并它們。（奇怪的是，另存為pdf只保存一張紙，而其他保存方式似乎可以保存整個(gè)工作簿。）是的，有一些工具可以在以后合并這三個(gè)文件，但是我想知道是否有一些簡單的方法可以使Excel將多個(gè)工作表保存為一個(gè)pdf文件。我現(xiàn)在通過一系列類似的信息進(jìn)行打印：ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, ...我可以代替一條語句，例如（偽代碼）：ThisWorkbook.Sheets(1,2,3,4).ExportAsFixedFormat Type:=xlTypePDF, ...
3 回答
大話西游666
TA貢獻(xiàn)1817條經(jīng)驗(yàn) 獲得超14個(gè)贊
首先選擇要合并的圖紙：
ThisWorkbook.Sheets(Array("Sheet1", "Sheet2")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\tempo.pdf", Quality:= xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
添加回答
舉報(bào)
0/150
提交
取消