Stop pinting
 

I have a spreadsheet I need to share but which I've protected so no-one can
edit but is it possible to stop them printing it out?

Stop pinting
 

hi
you could use the before print event.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox ("Printing this file is forbidden.")
Cancel = True
End Sub

open the vb editor (Alt+F11)
in the project window(far left) expand your project(file).
double click "this workbook"
in the code window(far right) click the left drop down arrow.
Click "workbook"
the workbook open event should default. delete it and paste the above code
into the code window.
close the vb editor. save the file.
note: with this code...NO ONE can print.
to remove the code, follow the above procedure except delete the before
print code. now everyone can print again.

Regards
FSt1

"Tricia" wrote:

I have a spreadsheet I need to share but which I've protected so no-one can
edit but is it possible to stop them printing it out?

Stop pinting
 

Thank you.

"FSt1" wrote:

hi
you could use the before print event.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox ("Printing this file is forbidden.")
Cancel = True
End Sub

open the vb editor (Alt+F11)
in the project window(far left) expand your project(file).
double click "this workbook"
in the code window(far right) click the left drop down arrow.
Click "workbook"
the workbook open event should default. delete it and paste the above code
into the code window.
close the vb editor. save the file.
note: with this code...NO ONE can print.
to remove the code, follow the above procedure except delete the before
print code. now everyone can print again.

Regards
FSt1

"Tricia" wrote:

I have a spreadsheet I need to share but which I've protected so no-one can
edit but is it possible to stop them printing it out?

Stop pinting
 

Tricia

This can be circumvented by users not enabling macros when they open the
workbook, so don't think the code alone will stop the printing.


Gord Dibben MS Excel MVP

On Mon, 25 Feb 2008 13:07:07 -0800, Tricia
wrote:

Thank you.

"FSt1" wrote:

hi
you could use the before print event.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox ("Printing this file is forbidden.")
Cancel = True
End Sub

open the vb editor (Alt+F11)
in the project window(far left) expand your project(file).
double click "this workbook"
in the code window(far right) click the left drop down arrow.
Click "workbook"
the workbook open event should default. delete it and paste the above code
into the code window.
close the vb editor. save the file.
note: with this code...NO ONE can print.
to remove the code, follow the above procedure except delete the before
print code. now everyone can print again.

Regards
FSt1

"Tricia" wrote:

I have a spreadsheet I need to share but which I've protected so no-one can
edit but is it possible to stop them printing it out?