Una de las cosas típicas que preguntan como informático y con los conocimientos de ethical hacking es si puedo desbloquear una planilla execel, la verdad como todas las personas no soy dueño de conocimiento pero realize una par de investigaciones y me encontré con compartida en la red una macros que realiza el desbloqueo de planilla.
Metodo 1 : Macros
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:
Macro
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
Ahora bien la macro funciona pero en planillas que puedas ingresar visual de excel sin solicitar la contraseña a cada rato.
bueno lo que comente anterior fue mi problema, ahora esto lo soluciones de la siguiente forma, es un poco mas engorrosa pero me funciono al 100% a mi y espero que lees funcione.
Metodo 2 : edición de excel
paso 1: es cambiar la extencion del archivo .xls .xlsm a .zip
paso 2: descomprimir el archivo para que podamos ver la estructura del archivo, queda algo asi
paso 3: ahora lo entretenido necesitamos buscar el archivo workbook.xml o sheet.xml este lo editaremos y buscaremos el siguiente tag <sheetProtection/>, ejemplo de codigo:
encontraremos algo así:
sheetprotection autofilter="0" formatcells="0" formatcolumns="0" formatrows="0" objects="1" password="CCF5" scenarios="0" sheet="1">
deberemos modificar y dejar los valores en 0, de esta forma
sheetprotection autofilter="0" formatcells="0" formatcolumns="0" formatrows="0" objects="0" password="CCF5" scenarios="0" sheet="0">
paso 4 : es comprimir el archivo nuevamente a .zip y cambiar la extensión correspondiente a excel.
paso 5 : probar y comentar en post
0 Comentarios