ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   preventing printing in Excel (https://www.excelbanter.com/excel-discussion-misc-queries/124532-preventing-printing-excel.html)

misscrf

preventing printing in Excel
 
Interesting discovery. I found this code on an old post:

Private Sub Workbook_BeforePrint(cancel As Boolean)
cancel = True
MsgBox "This page cannot be printed."
End Sub

I put this in, and then protected the worksheet, with autofilter on,
allowing sort and autofilter. The message comes up like it should.
The catch is that if you go to Tools | Macro | VB Editor - you can
delete the code! The code is not protected from being deleted in a
protected workbook!

Wow that is nuts. Just thought I would put this out there.


Peo Sjoblom

preventing printing in Excel
 
You can protect it in the VBE, press Alt + F11, find the workbook
in the left project pane, you can right click and select VBAProject
Properties, there you can protect it

Regards,

Peo Sjoblom

misscrf wrote:
Interesting discovery. I found this code on an old post:

Private Sub Workbook_BeforePrint(cancel As Boolean)
cancel = True
MsgBox "This page cannot be printed."
End Sub

I put this in, and then protected the worksheet, with autofilter on,
allowing sort and autofilter. The message comes up like it should.
The catch is that if you go to Tools | Macro | VB Editor - you can
delete the code! The code is not protected from being deleted in a
protected workbook!

Wow that is nuts. Just thought I would put this out there.


Jim Thomlinson

preventing printing in Excel
 
In the VBE go to Tools - VBA Project properties - Protection - Check off
lock from viewing and add a password...
--
HTH...

Jim Thomlinson


"misscrf" wrote:

Interesting discovery. I found this code on an old post:

Private Sub Workbook_BeforePrint(cancel As Boolean)
cancel = True
MsgBox "This page cannot be printed."
End Sub

I put this in, and then protected the worksheet, with autofilter on,
allowing sort and autofilter. The message comes up like it should.
The catch is that if you go to Tools | Macro | VB Editor - you can
delete the code! The code is not protected from being deleted in a
protected workbook!

Wow that is nuts. Just thought I would put this out there.



Dave Peterson

preventing printing in Excel
 
Excel supports lots of levels of protection.

You can protect the workbook with a password to open (file|saveAs|general
options)

You can protect the workbook so that sheets can't be
renamed/moved/deleted/inserted (tools|Protection|protect workbook)

You can protect the locked cells on a worksheet (tools|Protection|protect sheet)

And you can protect the workbook's project.
Inside the VBE
tools|VBAProject Properties|Protection tab.

(Each of these protections can be broken--some easier than the others.)

You want that VBAProject protection.

misscrf wrote:

Interesting discovery. I found this code on an old post:

Private Sub Workbook_BeforePrint(cancel As Boolean)
cancel = True
MsgBox "This page cannot be printed."
End Sub

I put this in, and then protected the worksheet, with autofilter on,
allowing sort and autofilter. The message comes up like it should.
The catch is that if you go to Tools | Macro | VB Editor - you can
delete the code! The code is not protected from being deleted in a
protected workbook!

Wow that is nuts. Just thought I would put this out there.


--

Dave Peterson


All times are GMT +1. The time now is 05:59 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com