Need help, vba giving error/not working even though it is coded to unprotect the sheet.

[pedie]

I am using this code be

Sheet3.Unprotect password:="Secret"
' my code
Sheet3.protect password:="Secret"

before every code. I have like 25 vba linked in different wierd ways..

Everytime I run the code it says sheet is protected, "Runtime error 1004, the cell or chart you are trying to change is protected"...weird because I did not even protect it manually (alt > t> P > p 'way).

Can someone please advice?

Thanks

 

[rusted314]

This is the oneI use to unprotect sheets.

Unprotect Multiple Sheets<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
<o> </o>
Sub Macro()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
If wSheet.ProtectContents = True Then
wSheet.Unprotect Password:="password"
Else
wSheet.Unprotect Password:="password"
End If
Next wSheet
End Sub

 

[pedie]

Where do i apply this code..I have like 25 codes remember?

And I dont want sheet3 to be unlocked anytime....


Thanks again!

 

[rusted314]

Sorry, I thought you were looking to unprotect multiple sheets in a workbook. Good luck with your search