Cracking Excel password protection

Although Excel encryption cannot prevent people who can open it from leaking through copying and other operations, it is at least a good defense line. To remove the password protection for Excel 2013, click "Office" and then "Save as". In the displayed "Save as" dialog box, click "Tools" in the lower left corner, select "general options": the "general options" dialog box is displayed, you can see that, of course, the star number shows the password: Clear the password displayed by this asterisk, and then click "OK: although an Excel file can be opened and edited, some workbooks cannot be edited because of the "protect worksheet" password. You can use the following code to remove password protection. Sub PasswordBreaker () 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 End Sub the above Code is also valid in Excel 2013