主题：Excel文件SaveToPDF出错

完全照抄《指南》，将一个.xls的文件Save成PDF，但被告诉“出错”，如下：

此主题相关图片如下：捕获错误.jpg

现将试验程序一并送来，请帮助看看问题在何处。谢谢

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:exceltopdf.zip

顺便说一下，我的OFFICE is 2010版本

SaveToPDF 必须是MS Office 2007 以上才有效，MS Office 2003不支持

刚才采用atmetmicoo在2014-11-26 的方案可以转成PDF。不过，如果Office版本低的用户如2003-2007Office的，如何

能保证他们也能将Excel转换成PDF？

《指南》是否需要进一步的完善这一部分？

谢谢

 excel的转换，是需要平台支持的。

Dim ExcelToPDF As String = Args(0)    'Args(0) = 窗口名
Dim wbr As WinForm.WebBrowser = Forms(Args(0)).Controls("WebBrowser1")

Dim tm As String = ProjectPath & "Attachments\v_2VW BREST CARAVELLE 2014.xls"
Dim fl As String = ProjectPath & "Reports\v_2VW BREST CARAVELLE 2014.pdf"
Dim Book As New XLS.Book(tm)
try
    Book.SaveToPDF(fl) '保存为PDF文件
    wbr.address = fl
catch ex As exception
    msgbox("出错了")
End try

我把您修改的程序部分拿来测试运行了，结果是“出错了”。