Thread: Stop pinting
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default 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?