Como desbloquear una hoja de cálculo de excel (quitarle la contraseña)

jueves, 26 de junio de 2008

Presiona ALT + F8 para que aparezca la pantalla de crear una macro, escribe un nombre determinado y presiona la tecla CREAR


Ésto te llevará al editor de VB (Visual Basic). Sustituye todo el contenido que hay en el editor por lo siguiente:

    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

Guarda y ejecuta dicha macro. Tras unos cuantos minutos te mostrará una advertencia con la clave Interna de Excel y te desbloqueara la hoja de la cual deseas ver las fórmulas.

Este proceso puede tardar un cierto tiempo dependiendo, principalmente, del PC que dispongamos.

NOTA: la clave que te muestra no es la que tecleó el usuario sino la de respaldo que ocupa internamente el codigo de Excel en dicha hoja.

Artículos relacionados


Clawder por em@il Clawder Feed Twitter

5 comentarios:

Anónimo dijo...

Excelente!!!

Probe la macro que sugieres y todo funciono ok.

Anónimo dijo...

estuve probando este procedimiento pero me atore ya que no se que quieres decir con VB (Visual Basic ya que no aparecio nada ni un recuador nada de nada


me pueden seguir ayudando y explicarme que puedo hacer

Claw dijo...

Cuando pulsas ALT+F8 y creas una macro, automáticamente te aparecerá el editor de Visual Basic, que es algo así como un editor de textos.

Dentro de esa pantalla (que será un cuadro de texto en blanco) pegas el código que puse arriba.

Salu2!

GLADYS dijo...

Oye, estoy realizando todo el proceso, sin embargo se queda detenido el proceso (se queda el reloj de arena y no sale ninguna clave) me puedes orientar. gracias

Anónimo dijo...

Me dejo sorprendido!! excelente esta el codigo... me ayudo muchisimo...