#Excel Ro Unprotect All Sheets Code Just Copy#

Excel Ro Unprotect All Sheets Code Just Copy

Press ALT + F11 or click on View Code in Developers TabsUnprotect All Sheets Using Macro To unprotect all sheets using macro Sub UnProtectUsingMacro() Dim ws As Worksheet For Each ws In Worksheets ws.Unprotect.In the Above White Space Enter the below Code. Do not change the code just copy paste: Sub PasswordBreaker()Dim i As Integer, j As Integer, k As IntegerDim l As Integer, m As Integer, n As IntegerDim i1 As Integer, i2 As Integer, i3 As IntegerDim i4 As Integer, i5 As Integer, i6 As IntegerFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _If ActiveSheet.ProtectContents = False ThenMsgBox '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)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. Press ALT + F8 shortcut key for opening Macro window & then select the Protect macro. Alternatively, you can press F5 to run the code in VBA screen. After.In case of a password protect worksheet you are unable to Edit the data on the Excel Sheet.

Excel Macro Unprotect All Sheets