Desproteger libro de excel

Esta es una agil forma para desproteger las hojas de excel cuando se hallan protejidas con una contraseña y la hayas olvidado.  No es una aplicación que requiera instalarse, se trata de unas cuantas lineas de codigo visual basic para crear un pequeño modulo en el libro de excel.  Desprotege ese libro de excel en solo 5 pasos.

1.  Abre el libro de excel.

2.  Alt + F11 .  Esta operación abrirá Visual Basic.

3.  Busca en la barra "Insertar" y elegir "Módulo"

4.  Copiar el siguiente código, y pegarlo en el modulo, guardar y ponerle un nombre.

Sub breakit()

Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n 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

5.  F5 para ejecutar.  O busca en la barra del Visual Basic Ejecutar.

Ejecutándose puede tardar varios minutos, el tiempo que tarde depende de la complejidad de la contraseña.
No tratar de trabajar en el archivo mientras se este ejecutando pues esto podría crear conflicto y bloquear la ejecución.