使用Delphi XE3中的OLE将Excel电子表格导出为PDF

Question

有人能告诉我如何使用delphi代码将excel电子表格导出为pdf吗？

我知道MS Word OLE对象中有一个命令可以导出到PDf，但我找不到任何关于Excel的信息。

Word To PDF示例：

Const
 wdExportFormatPDF = 17;

 WrdDoc.ExportAsFixedFormat(SaveToFile, wdExportFormatPDF);

Answer 1

正确的代码是

wb.ExportAsFixedFormat(xlTypePDF, FileName);

或

sheet.ExportAsFixedFormat(xlTypePDF, FileName);

其中wb是工作簿，sheet是工作表。如果由于某种原因，导入库未定义xlTypePDF，则其值为0.

一些文档链接：

• http://msdn.microsoft.com/en-us/library/office/ff198122.aspx
• http://msdn.microsoft.com/en-us/library/office/ff840291.aspx
• http://msdn.microsoft.com/en-us/library/office/bb241296.aspx

如果您仔细阅读文档，您会发现您一直以错误的顺序传递参数。