Tuesday, January 22, 2019

How to Unprotect an excel sheet without password using VB code

How to Unprotect an excel sheet without password using VB code.

This document will tell you how to unprotect an excel spreadsheet 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.
excel1
Press ALT +  F11 or click on View Code on Developers Tabs

Copy below code and paste under general object. 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

 Excel2

Now Click on the Run Button or press F5:
 Excel3

This Message contains the password which can be used to un-protect the other sheets in the same workbook.
 Excel4
 Just press Ok.Now you can edit your excel sheet. 

This method will work only for small files. 

1 comment: