The function .PrintOut will print the document to the default printer..... What is the code which will launch the print dialogue box and alow the user to select which printer to print the document to?

Thanks,

Nick Smith

Hi Nick

Thank you for your question

Your best option would be to write a procedure that allows the user to specify which printer is to be the active printer.

I general i would populate a combo box with a list of the available printers and have the user select the printer there. I would then write code that allocates the value of the combo box to a string variable. I would then use this variable to specify the active printer.

The crucial line of code would be

application.activeprinter = strvariable

It is obviously important to correctly name the printers in the combo box

Regards

Stephen

Thanks for the response Stephen...

The challenge with the combo box idea is that this code is to be used by 70 hotels around the country all with their own choices of networked printers..... Therefore i would be unable to source the addresses for each of the possible printer options.

Is there no code which would just launch the print dialogue box as if you had just clicked on the print button from the file menu?

Thanks,

Nick

Hi Nick

Thanks for your reply. Sorry misunderstood precisely what you required

The following line of code will display the print dialog box

Application.Dialogs(xlDialogPrint).Show

Hope this helps. If you need anything else, please let me know

Regards

Stephen