Autor
|
Tema: conocer o eliminar contraseña excel 2013 (Leído 22,006 veces)
|
engel lex
|
Hola
Hay macros , con los que se puede eliminar la contraseña. Pon simplemente en google " macro para eliminar contraseñas excel" y te saldrán los resultados .
Yo use uno hace tiempo y funciono perfectamente
Saludos
en ese caso es para una hoja, no un documento... y veo raro los algoritmos porque solo prueban de AAAAAAAAAAAA hasta BBBBBBBBBBBz y siendo VBscript, sabemos que eso puede ser una vida... pero me da curiosidad... en realidad funciona?
|
|
|
En línea
|
El problema con la sociedad actualmente radica en que todos creen que tienen el derecho de tener una opinión, y que esa opinión sea validada por todos, cuando lo correcto es que todos tengan derecho a una opinión, siempre y cuando esa opinión pueda ser ignorada, cuestionada, e incluso ser sujeta a burla, particularmente cuando no tiene sentido alguno.
|
|
|
emma.kazuba
Desconectado
Mensajes: 7
|
ya intente con los marcos si queres te paso el excel para que intentes
|
|
|
En línea
|
|
|
|
sanson
Desconectado
Mensajes: 471
|
en ese caso es para una hoja, no un documento... y veo raro los algoritmos porque solo prueban de AAAAAAAAAAAA hasta BBBBBBBBBBBz y siendo VBscript, sabemos que eso puede ser una vida... pero me da curiosidad... en realidad funciona?
Si , si que me funciono. Cúando llegue ha casa busco el macro que use y GE lo paso , para que lo pruebes . mi contraseña tenia números y letras (creo recordar). A ver si no se me olvida luego Saludos edito. aqui tienes el macro Abres una hoja de excel nueva -----------pulsas ALT+f11---------insertar modulo------------y en modulo 1 copias este codigo Sub jd() Dim a As Integer, b As Integer, c As Integer Dim d As Integer, e As Integer, f As Integer Dim a1 As Integer, a2 As Integer, a3 As Integer Dim a4 As Integer, a5 As Integer, a6 As Integer On Error Resume Next For a = 65 To 66: For b = 65 To 66: For c = 65 To 66 For d = 65 To 66: For e = 65 To 66: For a1 = 65 To 66 For a2 = 65 To 66: For a3 = 65 To 66: For a4 = 65 To 66 For a5 = 65 To 66: For a6 = 65 To 66: For f = 32 To 126 Contraseña = Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(a1) _ & Chr(a2) & Chr(a3) & Chr(a4) & Chr (a5) & Chr(a6) & Chr(f) ActiveSheet.Unprotect Contraseña If ActiveSheet.ProtectContents = False Then MsgBox "¡JD TE DA TU CONTRASEÑA!" & vbCr & "La contraseña es:" & vbCr & Contraseña Exit Sub End If Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next End Sub despues archivo------------importar---------lo guardas donde quieras----------abres tu hoja protegida--------alt+f11------------importar ----------seleccionas el modulo que has creado antes-------cierras-------------alt+f8----selecciona jd--------ejecutas y listo te dará una contraseña que aunque no se parecerá en nada a la tuya , sera valida . por supuesto esto es para hojas y libros protegidos, si lo que tienes es una contraseña al archivo, es mas difícil saludos
|
|
« Última modificación: 13 Abril 2015, 22:35 pm por sanson »
|
En línea
|
|
|
|
emma.kazuba
Desconectado
Mensajes: 7
|
No publicar datos personales el que me quiera ayudar que me hable en el face y le paso el excel
|
|
« Última modificación: 14 Abril 2015, 15:06 pm por engel lex »
|
En línea
|
|
|
|
Shell Root
|
@engel lex Si funciona y demora unos 3.5 segundos. Por otro lado, cuando dices que no se puede por fuerza bruta pero dices que: has un documento con todas las posibles contraseñas y variaciones que se te puedan ocurrir y daselo a un programa para que las intente No se supone que es lo mismo? Ya que se tiene un diccionario con las posibles contraseñas y variaciones y despúes se verifica una a una?
|
|
|
En línea
|
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.
|
|
|
engel lex
|
@engel lex Si funciona y demora unos 3.5 segundos.
Por otro lado, cuando dices que no se puede por fuerza bruta pero dices que:No se supone que es lo mismo? Ya que se tiene un diccionario con las posibles contraseñas y variaciones y despúes se verifica una a una?
porque el afirma que es la contraseña era una y no recuerdo si puse una parecida y ahora no puedo abrirlo ayuden que puedo hacer probe con varios programas y todo lo que yo indico que coloque todas las variaciones de esa... no que escriba tooodas las posibles en desconocimiento lo del script es digno de analizarlo... el sistema debe ser super tonto por dentro
|
|
|
En línea
|
El problema con la sociedad actualmente radica en que todos creen que tienen el derecho de tener una opinión, y que esa opinión sea validada por todos, cuando lo correcto es que todos tengan derecho a una opinión, siempre y cuando esa opinión pueda ser ignorada, cuestionada, e incluso ser sujeta a burla, particularmente cuando no tiene sentido alguno.
|
|
|
sanson
Desconectado
Mensajes: 471
|
Hola
Pues si, como seguirada nula pero para estos casos va bien . yo lo conocí hace unos 4 mese y me vino de perlas .
Saludos
|
|
|
En línea
|
|
|
|
emma.kazuba
Desconectado
Mensajes: 7
|
realmente me perdi alguien me puede ayudar ??
|
|
|
En línea
|
|
|
|
Shell Root
|
Puedes enviar/subir el archivo para testear que clase de contraseña es? O mostrar capturas de pantalla de lo que te pide.
|
|
|
En línea
|
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
Conocer o eliminar la contraeña de apertura de un excel.
Ingeniería Inversa
|
1mpuls0
|
6
|
14,296
|
14 Agosto 2014, 03:47 am
por .:UND3R:.
|
|
|
conocer o eliminar contrasena de apartura excel 2010
Seguridad
|
chino5000
|
3
|
3,836
|
28 Agosto 2014, 22:08 pm
por chino5000
|
|
|
Conocer contraseña
Seguridad
|
morf30
|
1
|
2,295
|
4 Marzo 2015, 18:55 pm
por engel lex
|
|
|
Excel-Access 2013 ¿ejecutable? o migrar a otro lenguaje
Programación Visual Basic
|
danibus
|
0
|
1,130
|
15 Junio 2018, 13:51 pm
por danibus
|
|
|
Contraseña de apertura excel 2013
Software
|
sergio_tf
|
0
|
1,315
|
4 Diciembre 2018, 13:02 pm
por sergio_tf
|
|