Desproteger Proyecto Vba De Excel
Paso 1:
Haz clic en inicio -> ejecutar
teclea lo siguiente
cmd
Se abrira una ventana del Simbolo de sistema
Paso 2:
teclea:
edit /70
Paso 3:
Seleccionatu archivo y lo abres. Nota importante: haz una copia del archivo original
Paso 4:
Busca el texto "DPB", asegurate que existe inmediatamente atras de "GC=" y [Host Extender Info]
[pic]
Paso 5:Cambia "DPB" por "DBx"
[pic]
Paso 6:
Guarda el Archivo
Paso 7:
Abre el archivo en Excel
Recibiras un mensaje de error, selecciona Si (Yes) o Aceptar
En este paso aun no podras accesar alproyecto
Paso 8:
Abre el Editor de Visual Basic
( Herramientas - Macro - Editor de Visual Basic )
PAso 9:
Abre las propiedades del proyecto
( Herramientas - Propiedades de VBProject)
Selecciona lapestaña "Proteccion"
Ingresa una contraseña y anotala
Paso 10:
Confirmalo con OK (Aceptar)
Paso 11:
Despues repite estos pasos y desactiva la casilla "Bloquear proyecto para la visualizacion" yborra los caracteres en la
Contraseña asi como en confirmar contraseña.
Paso 12:
Guarda el proyecto (Boton Guardar)
Listo! Ya tienes tu archivo para poder ver el proyecto completo.
ExcelMacro para quitar Password
Abres el editor de VB
ALT + F11
Creas un Modulo
Insretar>Modulo
Y pegas el codigo de abajo
-------------------------------------
Sub PasswordBreaker()
'Authorunknown but submitted by brettdj of www.experts-exchange.com
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 IntegerDim i4 As Integer, i5 As Integer, i6 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) &...
Regístrate para leer el documento completo.