设置EXCEL的默认打印机

系统设置了一个默认打印机，但在EXCEL有些人喜欢用其它的打印机做默认项，这个可以通过EXCEL的workbook的事件来实现

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

注意： 1、括号里打印机的名称一定不能错，如果不知道你想设置的打印机名称，可以设置默认打印机后再在EXCEL的立即窗口输入

?Application.ActivePrinter

这样就能获取该打印机的完整全称