Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
如题 ?
Dim Book As New XLS.Book(ProjectPath & "Attachments\申请书.xls")
Dim fl As String = ProjectPath & "Reports\申请书.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Verb = "Print" ' 直接打印 如何设置为指定打印机打印(窗口打印可以设置指定打印机,就是不知EXCEL报表如何设置
Doc.PrinterName = "EPSON LQ-730K ESC/P2" 指定了打印机
doc.Print() ’窗口打印