ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   stop excel sheet from being printed (https://www.excelbanter.com/excel-discussion-misc-queries/212715-stop-excel-sheet-being-printed.html)

Zambian

stop excel sheet from being printed
 
like to stop other users from being able to print the first page of a workbook

Sheeloo[_3_]

stop excel sheet from being printed
 
Use a macro like
Private Sub workbook_BeforePrint(Cancel As Boolean)

Select Case ActiveSheet.Name

Case "Sheet1", "Sheet2"

Cancel = True

MsgBox "Sorry, you cannot print this sheet from this workbook",_

vbInformation

End Select

End Sub


See
http://www.brainbell.com/tutorials/m...in_Actions.htm for details
(the above macro is taken from the page above)

"Zambian" wrote:

like to stop other users from being able to print the first page of a workbook


JMay

stop excel sheet from being printed
 
Different interpretations of what you are asking for here -- I see it that
you are asking to "SKIP" the printing of any Page1 on say a Sheet1 that print
several pages ordinarily (say 1 to 5).. any way

Give this a shot: (In a Standard module - paste in)

Sub PrintSkipP1()
Dim sht As Worksheet
TotPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
For Each sht In ActiveWindow.SelectedSheets
sht.PrintOut From:=2, To:=TotPages
Next sht
Set sht = Nothing
End Sub

"Zambian" wrote:

like to stop other users from being able to print the first page of a workbook



All times are GMT +1. The time now is 03:16 PM.

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