Scribd
Upload
36 views

Unprotect An Excel Sheet Without Password

This document provides instructions for unprotecting an Excel spreadsheet without knowing the password. It describes using Visual Basic for Applications code to try all possible combinations of characters to uncover the password. The code is copied and run to automatically unprotect the sheet. If successful, a message box displays the discovered password that can then be used to unprotect other sheets in the workbook.

Uploaded by

kylealexandro
Copyright
© © All Rights Reserved
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
36 views

Unprotect An Excel Sheet Without Password

This document provides instructions for unprotecting an Excel spreadsheet without knowing the password. It describes using Visual Basic for Applications code to try all possible combinations of characters to uncover the password. The code is copied and run to automatically unprotect the sheet. If successful, a message box displays the discovered password that can then be used to unprotect other sheets in the workbook.

Uploaded by

kylealexandro
Copyright
© © All Rights Reserved
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
You are on page 1/ 4

GRIZLI777

Tips Excel
Unprotect an excel sheet without password

Samsung
[Pick the date]




This document will tel you how to unprotect an excel spread sheet without having the
password
How to Unprotect an excel sheet without password
This document will tel you how to unprotect an excel spread sheet without having the
password
In case of a password protect worksheet you are unable to Edit the data on the Excel Sheet. If
you do not Remember the Password or do not know the password to unprotect the sheet just
follow the below simple steps.

Press ALT + F11 or click on View Code in Developers Tabs

In the Above White Space Enter the below Code. Do not change the code just copy paste:
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 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
Now Click on the Run Button or press F5:



And there you go the sheet is unprotected for you now. Also you would be getting a message
in the pop up window.
This Message is contains the password which can be used to unprotect the other sheets in the
same workbook.

You might also like