11 diciembre 2010

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.

5 comentarios:

  1. Buenas! Ando vendiendo dominios .com y .net para blogs de blogger! Si te interesa, Agregame al msn: manzs009@live.com.ar
    Y arreglamos ;)
    Saludos! Y Felices Fiestas!

    ResponderEliminar
  2. ya va más de 1 hora dando vueltas el puntero. Q tanto más se puede demorar

    ResponderEliminar
  3. Ya caigo... Lo que pasa que este macros no es para eliminar la contraseña de un libro excel, sino para desproteger una hoja excel. Lo que necesito es lo primero, ya que quiero eliminar y/o agregar pestañas (hojas excel) y no puedo porque está bloqueado con contraseña. Alguien puede ayudarme porfa

    ResponderEliminar
  4. necesito desblokear un libro de excel de 2010 es ´posible

    ResponderEliminar