Default printer selection in Excel macro

[Charlie]

I am writing a simple macro to allow some of the people in our company to
click on a toolbar button that will select our fax printer, send a fax, and
then reset the selected printer to the default.

What do I put after this:

Application.ActivePrinter =

Thanks,


Charlie

[Ron de Bruin]

Try this

Dim DPrinter As String
DPrinter = Application.ActivePrinter
Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne01:"
ActiveSheet.PrintOut
Application.ActivePrinter = DPrinter



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Charlie" <[email protected]> wrote in message news:[email protected]...
>I am writing a simple macro to allow some of the people in our company to
> click on a toolbar button that will select our fax printer, send a fax, and
> then reset the selected printer to the default.
>
> What do I put after this:
>
> Application.ActivePrinter =
>
> Thanks,
>
>
> Charlie