Desproteger un excel y conseguir la contraseña

Publicada junio 14, 2011

Les paso un truco de como desproteger un excel y conseguir la contraseña:

dale click derecho en la hoja que quieres desbloquear (en la pestaña de abajo, no en la hoja misma), luego en «ver codigo», se abre visual basic y pega el procedimiento de abajo llamado «breakit». Luego cierra visual basic y en la hoja que quieres desbloquear apreta «alt+f8» y elegi el procedimiento breakit y dale ejecutar. si me entendiste e hiciste todo bien te aparece una ventana con el codigo y te desprotege la hoja. Para los que sepan un poco de programación notarán que no es mas que un vil metodo de bucles anidados intentando todas las convinaciones posibles de caracteres hasta que encuentra una que si lo puede desproteger. Espero les sirva. Funciona en todas las versiones.

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