Desproteger o Desbloquear Libro EXCEL

Despoteger un archivo de Excel


Para desbloquear y desproteger una hoja de cálculo de Excel si nos olvidamos la contraseña, lo vamos a hacer mediante una rutina que te vamos a proveer a continuación, sigue estas instrucciones:


1. Abre normalmente el archivo Excel que quieres desbloquear o desproteger.

2. Pulsa ALT + F8 y se te abrirá una ventana; en el nombre del macro pones “DESBLOQ” o un nombre a tu elección, y pulsa el botón Crear.

3. Se te abrirá una nueva ventana, allí sustituyes y borras todo lo que esta escrito y lo reemplazas por el siguiente código:

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 "Archivo Desprotegido " & 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

Comentarios

Publicar un comentario

Entradas más populares de este blog

Mapear un Sftp a unidad a una unidad de disco

Imagen
SFTP Net Drive 2017 El software libre a veces puede ser inseguro y peligroso por muchas razones, desde la inexperiencia del desarrollador, la falta de habilidad en la seguridad, hasta la intención maliciosa. Al igual que todos nuestros productos, SFTP Net Drive se construye con la seguridad como una prioridad. Queremos asegurarnos de que está utilizando el software más seguro posible y hacerlo libre elimina el precio como un factor en su decisión. Fuente: http://www.sftpnetdrive.com/#key_features Descarga Gratuita: http://www.sftpnetdrive.com/download-thanks Mapear un Sftp a unidad a una unidad de disco( win-sshfs ) win-sshfs está disponible para Windows XP, Vista y 7, tanto para 32 como para 64 bit. Está basado en el framework .NET 4.0 y depende de la librería Dokan 0.6.0. El único problema con esta herramienta es que el proyecto está un tanto abandonado (ya que no se han liberado nuevas versiones desde mayo de 2012), pero es utilizado por mucha gente, pues ...
Leer más

Ventajas y desventajas de la criptografía de clave simétrica

Imagen
Documento sin título Definición de Criptografía.  La palabra criptografía proviene del griego “criptos” que significa “oculto” y “grafe” de escritura que alude textualmente a la “escritura oculta”. La criptografía es la ciencia que resguarda documentos y datos que actúa a través del uso de las cifras o códigos para escribir algo secreto en documentos y datos que se aplica a la información que circulan en las redes locales o en internet. Los romanos utilizaban códigos para guardar sus ideas y proyectos de guerra de aquellos que no lo conocían y lo hicieron con el propósito de que los entes que conocían el significado del código interpretan el mensaje oculto. Ventajas de la criptografía de clave simétrica La criptografía de clave simétrica tiene varios beneficios. Este tipo de cifrado es muy fácil de usar. Además...
Leer más

Limpiar y Reducir el Log de Transacciones SQL Server

Limpiar y Reducir el Log de Transacciones SQL Server Script de Ejemplo que permite limpiar y reducir el log de transacciones de una base de datos, no es posible limpiar el log sin realizar primero un backup del log, realizaremos nuestro ejemplo con una base de datos a la que llamaremos PrimaveraNew –Para Limpiar el Log de Transacciones es necesario realizar un Backup del Log Backup log PrimaveraNeW to disk  =‘C:\test\BackupLog.bak’ –Una vez hecho el backup consultamos el nombre lógico de los archivos del log sp_helpdb PrimaveraNeW  Antes de truncar el log cambiamos el modelo de recuperación a SIMPLE. ALTER DATABASE PrimaveraNeW SET RECOVERY SIMPLE; GO –Reducimos el log de transacciones a  1 MB. DBCC SHRINKFILE(PrimaveraNeW_Log, 1); GO — Cambiamos nuevamente el modelo de recuperación a Completo. ALTER DATABASE PrimaveraNeW SET RECOVERY...
Leer más