Forum Discussion

Walter1cat's avatar
Walter1cat
Copper Contributor
Jul 16, 2020

protection

I would like to un-protect cells in excel, but have no access to the password used to protect, as it was done many years ago.

1 Reply

  • NikolinoDE's avatar
    NikolinoDE
    Gold Contributor
    For this we create a macro. To do this, call the development environment with the key combination ALT + F11 and insert a new module.

    Now paste the following code:
    Sub Remove_sheet_protection ()
    On Error Resume Next
    For i = 65 To 66
    For j = 65 To 66
    For k = 65 To 66
    For l = 65 To 66
    For m = 65 To 66
    For n = 65 To 66
    For o = 65 To 66
    For p = 65 To 66
    For q = 65 To 66
    For r = 65 To 66
    For s = 65 To 66
    For t = 32 To 126

    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & _
    Chr(n) & Chr(o) & Chr(p) & Chr(q) & Chr(r) & Chr(s) & Chr(t)

    Next t
    Next s
    Next r
    Next q
    Next p
    Next o
    Next n
    Next m
    Next l
    Next k
    Next j
    Next i
    MsgBox " The Protection sheet has been removed "
    End Sub

    Now run the macro with the F5 key. A message appears in a few seconds that the blade guard has been removed successfully.

    Legal notice: If it is not your own worksheet and it is a matter of legal ownership then this code may not be used. Any use of this code is at your own risk.

    I would be happy to find out if I could help.

    Nikolino
    I know I don't know anything (Socrates)

Resources