CommandBars Problem ("Print Bar")

[Don]

I am modifying an application developed by someone else. In it, the person
uses the following:

CommandBars("Print Bar").Visible = True

to set up the print button on a report (no other buttons visible).
Unfortunately, this command bar uses the default printer, not allowing the
user a choice printers. I looked at the available command bars in the
CommandBars collection to see if there was an "advanced" print bar, but did
not see any.

Is there an easy way to modify this code so that the user is prompted for
the desired printer instead of using the default?

Thanks!

Don

 

[Someone]

Use the following code on a button:

DoCmd.SelectObject acReport, Screen.ActiveReport.Name
DoCmd.RunCommand acCmdPrint

M

 

[Don]

Thanks!

Don

Use the following code on a button:

DoCmd.SelectObject acReport, Screen.ActiveReport.Name
DoCmd.RunCommand acCmdPrint

M