Checking if worksheets are protected does not work properly

truskawa

New Member
Joined
Jan 27, 2011
Messages
27
Hi all,

I have an issue that is already driving me crazy. Maybe you could help me with this one.
I can't get this to work even though I thought it is quite easy and straightforward:

If workbook is protected then unprotect
If worksheet is protected then unprotect

If ActiveWorkbook.ProtectStructure = True Then
ActiveWorkbook.Unprotect ("pass1")
End If

For Each ws In ActiveWorkbook.Worksheets
If ws.ProtectContents = True Then
ws.Unprotect ("pass2")
End If
Next ws
What is the problem?
Problem is that for few of my worksheets that are not password protected, excel tries to unprotect them anyway and fails at it because password is incorrect (because they are not protected).

I would like to add that on normal protected sheet code works and unprotects it and run again skips through the worksheet as it should.

Have you ever encounter something like this?
Maybe there is a functionality enabled somewhere in my worksheet that causes .ProtectContents to be TRUE even though it is not protected? Where can I check something like this?
Maybe there is some problem with my code?
I can't give up on this!
 

Excel Facts

Easy bullets in Excel
If you have a numeric keypad, press Alt+7 on numeric keypad to type a bullet in Excel.

Forum statistics

Threads
1,224,587
Messages
6,179,738
Members
452,940
Latest member
Lawrenceiow

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top