Como desproteger suas planilhas Excel

Abra o editor de vba (alt+F11), insira um modulo e cole
o código abaixo, feche o editor de VBA e clique em ferramentas - macro - macros e desproteger, execute, espere o programa varrer sua senha e assim você poderá utilizar a planilha novamente.



Código para desbloqueio de planilhas.
Copie à partir da linha Sub

Sub
desproteger()


'Modulo para desproteger suas planilhas de excel.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