設置EXCEL的默認打印機

系統設置了一個默認打印機，但在EXCEL有些人喜歡用其它的打印機做默認項，這個可以通過EXCEL的workbook的事件來實現

    Private Sub Workbook_BeforePrint(Cancel As Boolean)   
    Application.ActivePrinter = "pdfFactory Pro 在 FPP3:"   
    End Sub   

 

 注意： 1、括號裏打印機的名稱一定不能錯，如果不知道你想設置的打印機名稱，可以設置默認打印機後再在EXCEL的立即窗口輸入

    ?Application.ActivePrinter  

這樣就能獲取該打印機的完整全稱

轉自http://blog.csdn.net/laoyebin/article/details/5302092