Buscar
Haz una pregunta Denunciar

Desbloquear un archivo de Excel que tiene clave

megaaguila 2Publicaciones sábado, 11 de mayo de 2013Fecha de inscripción sábado, 11 de mayo de 2013Última intervención - Última respuesta el 31 mar 2015, 19:36
Hola,
QUEIRO PEDIRLES EL FAVOR DE QUE ALGUIEN ME INSTRUYA DE COMO PUEDO DESBLOQUEAR UN ARCHIVO DE EXCEL QUE TIENE CLAVE Y NO LA SE, TENGO ES WINDOWS 7 ULTIMATE Y NO SE QUE HACER Y DEBO AMPLIAR LAS CELDAS, CAMBIAR LA FORMULA QUE ESTA INCORECTA, ENTRE OTROS. MIL GRACIAS
Sigue leyendo 
Respuesta
+21
moins plus
1er paso:
Presiona ALT + F8 para que te da la pantallita de crear una macro y el nombre deel macro y pone crear

2do paso:
cuando le des CREAR te lleva al editor de Visual Basic,
pone:



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


Guardas y despues ejecutas el macro ( flechita de play en el VB )
espera uno rato y te aparece un cartel con la clave interna de exel y en la opcion desprotejer hoja pones la clave y liisto =)
claudio- 25 feb 2015, 01:51
cuando ingreso crear me pide pass
Responder
ELy- 2 mar 2015, 18:43
Muy bueno, muchas gracias!!!
Responder
Wen- 25 mar 2015, 05:49
Gracias... una excelente herramienta me ayudo muchisimo.
Responder
Marlon- 26 mar 2015, 16:30
sUPER ES UNA AYUDA MARAVILLOSA
Responder
marya_pl84- 26 mar 2015, 22:01
Holaaaa una mega duda hago los pasos que comentas y me sale One Usable Password is : AAAAAAAAAA

y lo pongo, no es ese.
Responder
Deja tu comentario
Respuesta
+2
moins plus
Muchas gracias muy bien explicado y buena prog
Deja tu comentario
Respuesta
+1
moins plus
ME SALE One Usable Password is : AAAAAAAAAA
Y NO ES ES ESE
Deja tu comentario
Respuesta
+0
moins plus
Deja tu comentario
Respuesta
+0
moins plus
Deja tu comentario
Respuesta
+0
moins plus
No funciona ya que también tiene bloquedo el visual basic, no me deja crear una macro nueva, me pide contraseña
joselito- 6 feb 2015, 09:43
Clickea boton derecho sobre el nombre de una de las hojas (abajo a la izquierda) y en el menú contextual elige "ver código".

Si no hay ningun modulo añade uno.

Crea una función publica en lugar del la subrutina "Sub breakit()", en el módulo existente o en el recién creado, de la siguiente forma

public function breakit() --> Quita Sub breakit()
--- aqui iría el código que explica en el articulo ---
end function

y ejecutala desde la ventana inmediate (pulsa Ctrl + G), para ejecutarlo de la siguiente forma

a = breakit() y pulsa enter enter para ejecutar la llamada a la función

Esto ejecutará la función y esperando te dará la password
Responder
IRNMDN- 10 feb 2015, 22:04
Al crear el modulo tmbn pide la contraseña :S
Responder
claudio- 25 feb 2015, 01:51
lo mismo me pasa cuando ingreso a crear me pide la contraseña
Responder
Deja tu comentario
Respuesta
+0
moins plus
oscar- 13 feb 2015, 00:19
Exelente ayuda...
Responder
Deja tu comentario
Respuesta
+0
moins plus
Fco. Riffo- 24 mar 2015, 01:30
Perfecto karlosfds eres un hacker ...muchas gracias
Responder
Facard- 31 mar 2015, 19:36
Me pueden ayudar?, cuando preciono alt+f8 me sale un mensaje que dice VBAProject Contraseña, no se que hacer , espero de ayuda con sus amplios conocimiento del tema
Responder
Deja tu comentario
El documento « Desbloquear un archivo de Excel que tiene clave » de Kioskea (es.kioskea.net) se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo bajo las condiciones señaladas por esta licencia. Deberás hacerla siempre visible y dar crédito a Kioskea.

¿Todavía no eres usuario?

inscríbete, gratuitamente y en menos de un minuto!

Los miembros obtienen más respuestas que los usuarios anónimos.

Ser miembro te permite llevar un seguimiento detallado de tus consultas.

Ser miembro te permite gozar de otras opciones adicionales.