Default printer

  • Thread starter Thread starter peterG
  • Start date Start date
P

peterG

Is there a way to check the current default printer, so
that if I use another printer (e.g. PDF writer), I can
reset the original one using

Application.ActivePrinter = "...."

TIA
peterG
 
Peter,

You can't get or set the name of the default printer using Excel VBA code, but
it can be done using the GetDefaultPrinter and SetDefaultPrinter routines that
utilize API calls shown in Microsoft Knowledge Base Article 246772

-- Dennis Eisen
 
You can't get or set the name of the default printer
You can

Sub nameprinter()
MsgBox Application.ActivePrinter
End Sub

And you can set it like this
Application.ActivePrinter = "hp officejet k series on Ne00:"
 
Back
Top