Drop down menu issue in a report "print Preview"

[Callan]

I need the code to get rid of the items in the drop down menu or the entire
menu on a reports "Print Preview" window i.e: "If you right click on the
report's "Print Preview" screen, it will give you a menu with "Page setup",
"Print" etc.
I have used the following code to get rid of the custom command bar's Print
option and the "File" option in the Main Menu for certain users:

Private Sub AnyReport_Open()
If User = NoPrint then
CommandBars("Print Preview").Controls("Print").Visible = false
CommandBars("Main Menu").Controls("File").Visible = false
End If
End Sub

Now, I need the code to disable the "Print" option in the drop down menu for
certian users, as they are still able to print via the right click option in
the preview window.

Any suggestions?
Thanks in advance.

 

[Guest]

Open the report in design view. Look at the properties.
Go to Other, Shortcut Menu Bar.

You can put your own value here. You can change this value
in the open event of the report.

(david)

 

[Callan]

Hi david,

Thanks for the assistance,
I got it with:

Reports!Report1.ShortcutMenuBar = "=False"