如何选择某工作簿的多个工作表,按选定工作表打印成指定PDF
具体需求:(1)需要将某工作簿内若干工作表合并打印(另存为)一个PDF,不是整个工作簿。(2)打印成PDF,可以代码里预设定“待转出的PDF文件名吗?”
(3)EXCEL或WPS表格中的另存为PDF只能整个工作簿转,不满足若干指定工作表另存为。
整个工作簿或某个工作表的代码知道,但若干个选定工作表合并打印不知道。
整个工作簿打印
EXCEL.Workbooks.Open("&工作簿名")
EXCEL.Visible=.T.
Excel.activeworkbook.PrintOut &&整个工作簿打印
单个工作表打印
EXCEL.Workbooks.Open("&工作簿名") &&[方法一]
EXCEL.Worksheets("工作表名").Activate &&[方法一]
EXCEL.ActiveSheet.PrintOut &&[方法一]
整个工作簿另存为PDF
cPDFPath = "d:\output.pdf"
EXCEL.Workbooks.Open("&工作簿名")
Excel.activeworkbook.ExportAsFixedFormat(0,"&cPDFPath")