Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Protecting Workbook!..
Hello, I want to make sure that my workbook doesnt close until every single sheet is protected if any worksheet is left unprotected then the user must protect it before being able to close the workbook, How can i do this...possibly showing an error message too... Thanks a lot From John -- Neo1 ------------------------------------------------------------------------ Neo1's Profile: http://www.excelforum.com/member.php...o&userid=30329 View this thread: http://www.excelforum.com/showthread...hreadid=531466 |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Protecting Workbook!..
If you name a macro beforeClose() this run before the workbook closes.
You can then put the code in here to make the sheets protected. Thanks Paul "Neo1" wrote: Hello, I want to make sure that my workbook doesnt close until every single sheet is protected if any worksheet is left unprotected then the user must protect it before being able to close the workbook, How can i do this...possibly showing an error message too... Thanks a lot From John -- Neo1 ------------------------------------------------------------------------ Neo1's Profile: http://www.excelforum.com/member.php...o&userid=30329 View this thread: http://www.excelforum.com/showthread...hreadid=531466 |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Protecting Workbook!..
I dont understand, can you explain it to me step to step please Thanks a lot From John -- Neo1 ------------------------------------------------------------------------ Neo1's Profile: http://www.excelforum.com/member.php...o&userid=30329 View this thread: http://www.excelforum.com/showthread...hreadid=531466 |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Protecting Workbook!..
John
Put the code below in the Thisworkbook not in a normal module in the VBA editor. If you want I can email you the file Thanks Paul Private Sub Workbook_BeforeClose(Cancel As Boolean) sh = Worksheets.Count For n = 1 To sh Sheets(n).Select ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True Next n End Sub "Neo1" wrote: I dont understand, can you explain it to me step to step please Thanks a lot From John -- Neo1 ------------------------------------------------------------------------ Neo1's Profile: http://www.excelforum.com/member.php...o&userid=30329 View this thread: http://www.excelforum.com/showthread...hreadid=531466 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Repost:Automatically inserting a row in external workbook | Excel Discussion (Misc queries) | |||
Protect Workbook vs Worksheet?? | Excel Worksheet Functions | |||
Auto updating a workbook with data from another workbook | Excel Discussion (Misc queries) | |||
Protecting A Workbook from being saved/written over | Excel Discussion (Misc queries) | |||
How to hyperlink from a workbook to sheets in another workbook? | Excel Worksheet Functions |