Custom menu- Print command

[Eric G]

I have a custom menu to prevent user error.
There are just two commands, Print and Close.

Can someone please tell me the steps to take so that I can add a
second Print option, this one allowing the user to set up the printer:
choose which printer to user, select the number of pages, order etc.
Right now the Print command just prints without giving the user any
ability to control the print job.

Thanks! Eric

 

[Reid Kell]

DoCmd.OpenReport "myReport", acViewPreview
DoCmd.RunCommand acCmdPrint

 

[Albert D. Kallal]

The code I use to popup the printer stuff is:


Function DisplayPrintDialog()

On Error Resume Next
DoCmd.SelectObject acReport, Screen.ActiveReport.Name
DoCmd.RunCommand acCmdPrint

End Function


You can have your custom menu button call the above code. The "selectOjbect"
is not normally needed, but if you have a form with a timer event on it..the
above will fix a bug/focus problem.

 

[Eric G]

DoCmd.OpenReport "myReport", acViewPreview
DoCmd.RunCommand acCmdPrint

Thanks very much Reid, I'll try it out. Eric

 

[Eric G]

The code I use to popup the printer stuff is:

Function DisplayPrintDialog()

On Error Resume Next
DoCmd.SelectObject acReport, Screen.ActiveReport.Name
DoCmd.RunCommand acCmdPrint

End Function


You can have your custom menu button call the above code. The "selectOjbect"
is not normally needed, but if you have a form with a timer event on it..the
above will fix a bug/focus problem.

Thanks very much Albert, I'll try out the code this weekend. Eric