ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   How do I unprotect multiple sheets simultaneously? (https://www.excelbanter.com/excel-discussion-misc-queries/107398-how-do-i-unprotect-multiple-sheets-simultaneously.html)

ExcelPC

How do I unprotect multiple sheets simultaneously?
 
I have a worksheet with 12 tabs. The sheets in each tab are protected by the
same password.

I have tried selecting all the tabs (similar to making changes on all sheets
in tabs) and tried to unprotect all the sheets simultaneously - be have been
unsuccessful.

I have to do this for many files, hence a quicker/more efficient way is
desireable.



GurlRossGurl

How do I unprotect multiple sheets simultaneously?
 
Write a macro that will repeat the unprotect. Assign the macro to a key so
all you need do is press a key for each sheet.

"ExcelPC" wrote:

I have a worksheet with 12 tabs. The sheets in each tab are protected by the
same password.

I have tried selecting all the tabs (similar to making changes on all sheets
in tabs) and tried to unprotect all the sheets simultaneously - be have been
unsuccessful.

I have to do this for many files, hence a quicker/more efficient way is
desireable.



bigwheel

How do I unprotect multiple sheets simultaneously?
 
Run a little macro such as:

Sub UnProtectAll()
Dim mySheet As Worksheet
For Each mySheet In Worksheets
mySheet.Unprotect
Next mySheet
End Sub

"ExcelPC" wrote:

I have a worksheet with 12 tabs. The sheets in each tab are protected by the
same password.

I have tried selecting all the tabs (similar to making changes on all sheets
in tabs) and tried to unprotect all the sheets simultaneously - be have been
unsuccessful.

I have to do this for many files, hence a quicker/more efficient way is
desireable.



Gord Dibben

How do I unprotect multiple sheets simultaneously?
 
Sub UnprotectAllSheets()
Application.ScreenUpdating = False
Dim n As Single
For n = 1 To Sheets.Count
Sheets(n).Unprotect Password:="password" 'change to your password
Next n
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP

On Mon, 28 Aug 2006 13:58:01 -0700, ExcelPC
wrote:

I have a worksheet with 12 tabs. The sheets in each tab are protected by the
same password.

I have tried selecting all the tabs (similar to making changes on all sheets
in tabs) and tried to unprotect all the sheets simultaneously - be have been
unsuccessful.

I have to do this for many files, hence a quicker/more efficient way is
desireable.




All times are GMT +1. The time now is 08:45 PM.

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