Good to hear you're sorted out.

Thanks for the added info and method.


Gord

On Thu, 06 Nov 2008 10:32:26 +0200, Harri Lumme <harri@pharmatorydotcom
wrote:

Thanks Gord,
This was basically the solution I was looking for.
Disabling macros would not be a loophole, since I have the page content
being created with another macro and by disabling macros it would not
work either (I assume).

So what I did was to declare a global boolean 'Using_macro = FALSE'.
This is then changed to TRUE in my page creation and printout macro.
After the printout the same macro returns the 'Using_macro' to FALSE.

Finally I added the condition clause to your suggestion:
---
Cancel = True
if Using_macro then
Cancel = False
end if
---
The MsgBox was not necessary in my case.

thanks again,
Harri


Just for one workbook?

Stick this code in Thisworkbook module.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox "no printing allowed"
Cancel = True
End Sub

Note: users can always circumvent by disabling macros on open.


Gord Dibben MS Excel MVP

On Tue, 21 Oct 2008 11:18:18 +0300, Harri Lumme <harri@pharmatorydotcom
wrote:

I need to protect the worksheet from being printed out using the most
obvious printing controls. Disabling the toolbar printing icon was
easy, as was blocking the ctrl-P key combination but how to disable the
print item in the File menu??
The VB property for CommandBar.Controls which could manipulate the
submenu items is not documented.

thanks for help, Harri