Delete Macro

  • Thread starter Thread starter Pamela
  • Start date Start date
P

Pamela

Hi Guys!!!
I added this code this code and now I want to delete it:

Private Sub Workbook_Open()
'If you have different passwords
'for each Worksheet.
Sheets(1).Protect Password:="Secret", _
UserInterFaceOnly:=True


Sheets(3).Protect Password:="Secret", _
UserInterFaceOnly:=True


'Repeat as needed.
End Sub

I when inside (alt F11) and selected and delete but when I reopen the
workbook still is protected.
How I can delete the proteccion from the workbook?

thank you:
Pamela xoxo
 
The last statement in your now-deleted code protected the worksheets.

Deleting the code does not unprotect them.

Run this macro to unprotect all the sheets then save the workbook again.

Sub UnprotectAllSheets()
Application.ScreenUpdating = False
Dim N As Single
For N = 1 To Sheets.Count
Sheets(N).Unprotect Password:="Secret"
Next N
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP
 
The last statement in your now-deleted code protected the worksheets.

Deleting the code does not unprotect them.

Run this macro to unprotect all the sheets then save the workbook again.

Sub UnprotectAllSheets()
    Application.ScreenUpdating = False
    Dim N As Single
    For N = 1 To Sheets.Count
        Sheets(N).Unprotect Password:="Secret"
    Next N
    Application.ScreenUpdating = True
End Sub

Gord Dibben  MS Excel MVP








- Show quoted text -
Click to expand...

Thank you!!!
 
Back
Top