viernes, 23 de mayo de 2014

Remover claves en libros y hojas excel.





Buenas, aquí voy a adjuntar un par de alternativas para que podamos recuperar el acceso a nuestros Excel por si hemos olvidado la clave del libro u hoja de nuestro excel.


Lo primero voy a comentar un par de programas que puede que nos puedan  dar alguna solución, por si las otras opciones no funcionan.

El primero es Remove Excel Password, que soporta archivos con formato 97 a 2003 y Office 2007. Este software no puede eliminar las contraseñas de VBA o contraseñas necesarias para abrir un archivo Excel, así que si no puedes abrir tu archivo, este programa no te servirá.



El segundo es Excel Password Recovery Master utilizado para crackear los documentos protegidos por contraseña creados en MS Excel 97/2000/XP/2003/2007/2010 (archivos *.xls, *.xlt, *.xla, *.xlsx, *.xlsm, *.xltx, y *.xltm). El programa permite recuperar las contraseñas de apertura (open password), así como recupera contraseñas de escritura, contraseñas de los libros (workbook password), libros compartidos (shared workbook password) y hojas de trabajo.

Por último y por si no encontráis nada que os sirva, aquí dejo un módulo para Excel que seguramente os vaya bien para quitar esas protecciones:

Cómo eliminar la contraseña de Proyectos VBA en Excel 2007




Otras formas de desbloquear las hojas y libros excel son mediante macros o complementos para excel.


Macros Excel

Para crear una macro lo primero que deberemos de hacer es lo siguiente:

Desde dentro de cualquier excel presionamos ALT+F11 = NOS ABRIRA LA VENTANA DE VISUAL BASIC.
Le damos click en INSERTAR->MODULO y SE CREARA UNA CARPETA QUE CONTIENE Modulo1.
SELECCIONA EL MODULO1
Y luego insertamos el codigo que queremos incluir en el Excel.

Codigos:

Eliminar Password Hoja Excel


Sub DesbloquearProtecccionHOJA()
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
Dim passWSh As String
On Error Resume Next
passWSh = pass
With ActiveSheet
.Unprotect passWSh
If .ProtectContents = False Then
MsgBox "La Hoja Activa ha sido desprotegida"
Exit Sub
End If
End With

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
passWSh = Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
With ActiveSheet
.Unprotect passWSh
If .ProtectContents = False Then
MsgBox "La Hoja Activa ha sido desprotegida"
pass = passWSh
Exit Sub
End If
End With

Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub




Eliminar Password Libro Excel

Sub DesbloquearProtecccionLibro()
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
Dim passWbk As String
On Error Resume Next
passWbk = pass
With ActiveWorkbook
.Unprotect passWbk
If .ProtectStructure = False And .ProtectWindows = False Then
MsgBox .Name & " ha sido DESPROTEGIDO (Libro)", , "Libro Desprotegido"

Exit Sub
End If
End With
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

passWbk = Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
With ActiveWorkbook
.Unprotect passWbk
If .ProtectStructure = False And .ProtectWindows = False Then
MsgBox .Name & " ha sido DESPROTEGIDO (Libro)", , "Libro Desprotegido"
pass = passWbk

Exit Sub
End If
End With

Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub


Para ejecutar las macros podemos puslar Alt+F8 o ir a Herramientas-> Macros -> Macro.


Estas macros las podemos exportar para tenerlas en un fichero y así usarlas en otros Excel y evitarnos copiar y pegar código.

Para hacer eso lo único que tenemos que hacer es clic derecho sobre el icono de Modulo1 y darle a Exportar y Exportaremos las macros a un fichero (*.bas).

Yo os adjunto un fichero por si alguno no sabe como.
Macropassword

Para añadir el Modulo con las macros lo único que tenemos que hacer es desde el excel pulsamos Alt+F11, Archivo->Importar archivo, buscamos el fichero y lo abrimos y nos añadirá un modulo con las Macros para eliminar la clave de nuestra hoja o libro excel.



Si ves que el tema de las macros es demasiado complicado para ti, no te preocupes tengo otra solución que es un plugin para añadir 2 funciones al menú Herramientas que podrán ayudarnos a quitar las claves de las Hojas y Libros Excel.


Para usarlo lo único que tenemos que hacer es abrir el fichero, se abrirá Excel y desde ahí abrimos nuestro fichero Excel al que queremos eliminar las password.


Podéis descargar el fichero desde aquí

Y para ejecutarlo lo único que tenéis que ir es a Herramientas y desde ahi Unprotect sheet ( Password Hoja ),Unprotect Woorkbook



VOY A HACER UNA PUNTUALIZACIÓN, PARA QUE TODO ESTO FUNCIONE, DEBÉIS DE TENER LA SEGURIDAD DE LAS MACROS A NIVEL MEDIO.

http://3.bp.blogspot.com/-__sEj8AZ_QI/UjYHvbgz_tI/AAAAAAAAAJM/1gUDD79bOOw/s1600/Capturar-6.jpg