多囊卵巢应该吃什么药:vb打印问题

来源:百度文库 编辑:高校问答 时间:2024/04/29 18:53:06
Dim i
Dim objexcel As Object
Set objexcel = CreateObject(Excel.Application)
objexcel.workbooks.Open FileName:=App.Path & \"\\book1.xls\"
objexcel.Sheets.PrintOut
For Each i In objexcel.Sheets
i.PrintOut
Next i
objexcel.Quit

以上代码是打开excel文档并打印,请问怎么在打印的时候选择打印机,上面代码是默认打印机