将Excel 2003工作簿转换为pdf表格

我再次杀了你的时间。 我必须做一个应用程序，将工作簿转换为PDF我正在使用PDF995。 但是我不知道如何configuration纸张尺寸，因为一些纸张大约需要150英寸。 也不是转换成平面的。 我希望它根据表名创buildpdf。 以下是我使用的代码示例。

Dim objExcel As Microsoft.Office.Interop.Excel.Application Dim objWorkBook As Microsoft.Office.Interop.Excel.Workbook Dim totalWorkSheets As Microsoft.Office.Interop.Excel.Worksheet Public Sub PrintByName(ByVal s As Worksheet) Dim myprinter As String Dim printer_name As String printer_name = "PDF995" If System.IO.Directory.Exists("D:\" + objWorkBook.Name) Then Else System.IO.Directory.CreateDirectory("D:\" + objWorkBook.Name) End If myprinter = objExcel.ActivePrinter objExcel.ActivePrinter = printer_name Thread.Sleep(1000) s.PrintOut(Preview:=False, ActivePrinter:=printer_name, PrintToFile:=True,PrToFileName:=s.Name) System.Threading.Thread.Sleep(2500) objExcel.ActivePrinter = myprinter End Sub 

我知道我传递的文件名不起作用，但我不能得到一个办法。 另外，我应该如何configuration纸张大小等。我尝过了很多试用的应用程序，但他们大多数都给错误，如无法打开Excel或运行时错误等。我认为这可能是由于工作簿中的链接。 任何人都可以告诉我这个代码有多正确，configuration纸张大小等等。 提前致谢 ……….