Crack Protected Excel Sheet

Posted by Gino Abraham on Geeks with Blogs See other posts from Geeks with Blogs or by Gino Abraham
Published on Thu, 03 Feb 2011 13:00:51 GMT Indexed on 2011/02/03 15:26 UTC
Read the original article Hit count: 445

Filed under:

The following snippet will allow you to unprotect an excel sheet which is protected using a password. press Alt + F11 when the excel is open, it will open up VB macro editor. Insert a Module and copy the following code. this will clear the password and you will be free to edit the file.

if you want to unprotect the workbook rather the a work sheet change ActiveSheet to ThisWorkbook in the following code.

Happy Cracking

 

 Sub CrackPassword()
 
 
  Dim v1 As Integer, u1 As Integer, w1 As Integer
  Dim v2 As Integer, u2 As Integer, w2 As Integer
  Dim v3 As Integer, u3 As Integer, w3 As Integer
  Dim v4 As Integer, u4 As Integer, w4 As Integer
  On Error Resume Next
 
  For v1 = 65 To 66: For u1 = 65 To 66: For w1 = 65 To 66
  For v2 = 65 To 66: For u2 = 65 To 66: For w2 = 65 To 66
  For v3 = 65 To 66: For u3 = 65 To 66: For w3 = 65 To 66
  For v4 = 65 To 66: For u4 = 65 To 66: For w4 = 32 To 126
    
       
 ActiveSheet.Unprotect Chr(v1) & Chr(u1) & Chr(w1) & _
      Chr(v2) & Chr(u2) & Chr(v3) & Chr(u3) & Chr(w3) & _
      Chr(v4) & Chr(u4) & Chr(w4) & Chr(w2)
 
    
  Next: Next: Next: Next: Next: Next
  Next: Next: Next: Next: Next: Next

End Sub

 

 

© Geeks with Blogs or respective owner