How do I unprotect the wordsheet on my Excel 2007?

Asked By white patrickk 10 points N/A Posted on - 03/30/2013

Hello techyv.com!

I have here a Laptop with an Operating System of Windows 7. I have been using Microsoft Excel 2007 for my work. Now I have been editing some stuffs with the project that I have been making, and suddenly I've realized that I have encoded a wrong password for it that is different from the usual that I have been using. Now I can't seem to remember what I have placed on it. May I ask how do I unprotect sheet on my Excel 2007?

• Status: Open
• Question Views: 768
• Answer Count: 2
• Vote Up 1 Vote Down

• Answer Accepted: Yes
• Question Category: MS Excel

Best Answer by Leland L Olson

Go To Solution

Answered By Luz M Terry 35 points N/A #176650

How do I unprotect the wordsheet on my Excel 2007?

To Unprotect your Excel sheet without knowing the password, just follow the below mentioned steps:

Step 1: Change the file extension from xlsx to zip and open the file using Winzip or winrar.

Step 2: Open the xl folder and then worksheets folder.

Step 3: Edit the worksheet you want to Unprotect (right click and edit).

Step 4: Delete the sheetProtection tag and save the changes (For Eg: <sheetProtection password="46S1" sheet="3" objects="1" scenarios="1"/>).

Step 5: Change the file extension from zip to xlsx.

About Luz M Terry

Questions
30

Answers
107

Best Answers
13

• Vote Up 0 Vote Down

• Posted on - 04/11/2013
• Question Category: MS Excel

Best Answer

Best Answer

Answered By Leland L Olson 40 points N/A #176651

How do I unprotect the wordsheet on my Excel 2007?

Hello,

To unprotect the excel sheets having forgotten the password follow the following steps:

1. Open MS Excel that is password protected
2. Press ALT + F11
3. On the white space that appears type the following code:

Sub PasswordBreaker()
    'Breaks worksheet password protection.
    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    On Error style="font-family: Verdana; font-weight: normal; font-size: 12px; color: black;">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 i1 = 65 To 66
    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
        Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
        Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    If ActiveSheet.ProtectContents = False Then
        MsgBox "One usable password is " & Chr(i) & Chr(j) & _
            Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
            Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
         Exit Sub
    End If
    Next: Next: Next: Next: Next: Next
    Next: Next: Next: Next: Next: Next
End Sub

4. Click the run button.

The sheet is now unprotected. Messages may appear on pop up windows,these messages contain the password to unprotect the other sheets.

Hope this works for you. All the best.

Thanks.

About Leland L Olson

Questions
15

Answers
44

Best Answers
15

• Vote Up 0 Vote Down

• Posted on - 04/11/2013
• Question Category: MS Excel