Excel Tips VBA tools Unprotect worksheet through VBA

Hi

I have been busy with moving from Singapore to Hong Kong and Hong Kong to Singapore. Now, I am back to Hong Kong and have some time to talk about IT stuff.....

This is a VBA code in excel which most people would use for "cracking" their own excel. You may forgot the password of your created in your excel spreadsheet, but you can use these codes to crack. You can find these codes in other websites. By the way, you can find these codes anywhere.

1. Use a new excel book and press "ALT +F11". Insert a new module

2. Paste these codes

Public Sub Password_unprotect()
Dim intPress As Integer
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
Dim wbsh, tmstrt, attmpt
tmstrt = Timer
attmpt = 0
On Error Resume Next
Set wbsh = ActiveWorkbook.ActiveSheet
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
attmpt = attmpt + 1
wbsh.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)
DoEvents
If wbsh.ProtectContents = False Then
MsgBox "Match found" & "Sheet is now unprotected."

End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub

3. Here is an example.

Let's say you have a worksheet that is protected.

Step 1: Make another worksheet (CTRL +N) called Book 2

Step 2: Press ALT + F11 to go vba code

Step 3: Select "insert" and then "Module"

Step 4: Place the code in your new module

Step 5: Go to your worksheet that is protected (Book1.xls). Just click the worksheet.

Step 6:  Go to visual basic screen and press run.

Step 7: Ok now your worksheet (book1.xls) is unprotected now.

Just a kindly reminder. Please use this legally and you use it for your own use. :D