Hi Guys,
I have a small issue I'm hoping someone could help me with. I want to stop users printing copies of sheets, simply because they are protected and they cannot set print area and when they do print they get a bit of a mish mash i.e printed on 4 pages etc, but they still insist on using these sheets. There is a main sheet where they should do the printing from which when they choose their required sheet the code unprotects the sheet and prints to the correct size and shape etc. Basically what I want to do is stop the users printing sheets when they are protected, if unprotected the code will print the sheet. I have the basic stop printing code below, but can it be modified to stop printing for protected sheets only.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
End Sub
As always Thanks in advance.
Craig.
I have a small issue I'm hoping someone could help me with. I want to stop users printing copies of sheets, simply because they are protected and they cannot set print area and when they do print they get a bit of a mish mash i.e printed on 4 pages etc, but they still insist on using these sheets. There is a main sheet where they should do the printing from which when they choose their required sheet the code unprotects the sheet and prints to the correct size and shape etc. Basically what I want to do is stop the users printing sheets when they are protected, if unprotected the code will print the sheet. I have the basic stop printing code below, but can it be modified to stop printing for protected sheets only.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
End Sub
As always Thanks in advance.
Craig.