Unprotecting Sheets
Is it possible to unprotect all sheets in a workbook at the same time?
|
Unprotecting Sheets
Zee,
You could use VBA to cycle through all the sheets that are protected and unprotect them that way. Don't think it is possible without code. -- http://www.ExcelHelp.us 888-MY-ETHER ext. 01781474 "Zee" wrote: Is it possible to unprotect all sheets in a workbook at the same time? |
Unprotecting Sheets
Unfortunately I am not very familiar with VBA and therefore am not sure what
to enter into the editor to accomplish this. "galimi" wrote: Zee, You could use VBA to cycle through all the sheets that are protected and unprotect them that way. Don't think it is possible without code. -- http://www.ExcelHelp.us 888-MY-ETHER ext. 01781474 "Zee" wrote: Is it possible to unprotect all sheets in a workbook at the same time? |
Unprotecting Sheets
Hi Galimi,
I tried pasting the code into the VB editor and the first line states an error. Thanks "galimi" wrote: Zee, The following code should do it: public sub unlock for each sht in thisworkbook.sheets sht.unprotect next end sub -- http://www.ExcelHelp.us Call me at 1-888-MY-ETHER ext. 01781474 "Zee" wrote: Unfortunately I am not very familiar with VBA and therefore am not sure what to enter into the editor to accomplish this. "galimi" wrote: Zee, You could use VBA to cycle through all the sheets that are protected and unprotect them that way. Don't think it is possible without code. -- http://www.ExcelHelp.us 888-MY-ETHER ext. 01781474 "Zee" wrote: Is it possible to unprotect all sheets in a workbook at the same time? |
Unprotecting Sheets
If they have a password un comment the password section and change mypassword for your password, the code goes in a standard module. Sub Ulock_Sheets() Dim Sh as worksheet For each sh in sheets sh.unprotect 'password:="mypassword" next sh end sub -- Simon Lloyd Regards, Simon Lloyd 'The Code Cage' (http://www.thecodecage.com) ------------------------------------------------------------------------ Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1 View this thread: http://www.thecodecage.com/forumz/sh...ad.php?t=33860 |
Unprotecting Sheets
unlock is a reserved word.
Try............... public sub un_lock() Dim sht as Worksheet for each sht in thisworkbook.sheets sht.unprotect next end sub If the sheets have the same password you could use........... Sub UnprotectAllSheets() Application.ScreenUpdating = False Dim N As Single For N = 1 To Sheets.Count Sheets(N).Unprotect Password:="password" 'edit to your actual pword Next N Application.ScreenUpdating = True End Sub Gord Dibben MS Excel MVP On Wed, 26 Nov 2008 07:12:00 -0800, Zee wrote: Hi Galimi, I tried pasting the code into the VB editor and the first line states an error. Thanks "galimi" wrote: Zee, The following code should do it: public sub unlock for each sht in thisworkbook.sheets sht.unprotect next end sub -- http://www.ExcelHelp.us Call me at 1-888-MY-ETHER ext. 01781474 "Zee" wrote: Unfortunately I am not very familiar with VBA and therefore am not sure what to enter into the editor to accomplish this. "galimi" wrote: Zee, You could use VBA to cycle through all the sheets that are protected and unprotect them that way. Don't think it is possible without code. -- http://www.ExcelHelp.us 888-MY-ETHER ext. 01781474 "Zee" wrote: Is it possible to unprotect all sheets in a workbook at the same time? |
All times are GMT +1. The time now is 03:19 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com