if Application.Dialogs(xlDialogPrinterSetup).Show < False then
Cells(1,1).Value = Application.ActivePrinter

End if

--
Regards,
Tom Ogilvy


"steveh" wrote in message
...
Is it possible to get a value from the printer dialogue box? What I am
trying
to do is to get the user to select the printer that they want from the
dialogue box which is displayed using
Application.Dialogs(xlDialogPrinterSetup).Show. I would like this printer
then to be shown on an excel sheet. Is this possible?