1

Tengo un Excel antiguo que en su día fue protegido con clave para la hoja, de manera que no se puede modificar el ancho de columnas ni introducir nuevos gráficos. Además las fórmulas no aparecen en la barra de fórmulas.

Ahora es necesario modificarlo pero no tengo la clave de protección.

¿Sabe alguien algún método que pueda utilizar para desbloquear la hoja?

1 respuesta 1

3

Ya lo he solucionado. He seguido buscando hasta encontrar un código en VBA que hace exactamente eso. No recupera la clave original pero si una equivalente.

PEGAR EL SIGUIENTE SCRIPT EN EL CODIGO DE LA HOJA DESEADA

Sub SacaClaves()
    Dim Contraseña As String
    Dim i01 As Integer, i02 As Integer, i03 As Integer
    Dim i04 As Integer, i05 As Integer, i06 As Integer
    Dim i07 As Integer, i08 As Integer, i09 As Integer
    Dim i10 As Integer, i11 As Integer, i12 As Integer
    On Error Resume Next
    For i01 = 65 To 66: For i02 = 65 To 66: For i03 = 65 To 66
    For i04 = 65 To 66: For i05 = 65 To 66: For i06 = 65 To 66
    For i07 = 65 To 66: For i08 = 65 To 66: For i09 = 65 To 66
    For i10 = 65 To 66: For i11 = 65 To 66: For i12 = 32 To 126
        Contraseña = Chr(i01) & Chr(i02) & Chr(i03) & Chr(i04) & Chr(i05) & Chr(i06) & Chr(i07) & Chr(i08) & Chr(i09) & Chr(i10) & Chr(i11) & Chr(i12)
        ActiveSheet.Unprotect Contraseña
        If ActiveSheet.ProtectContents = False Then
            Debug.Print Contraseña
            MsgBox "La contraseña encontrada es " & Contraseña
            Exit Sub
        End If
    Next: Next: Next
    Next: Next: Next
    Next: Next: Next
    Next: Next: Next
End Sub
3
  • 3
    Me alegra que encontraras solucion pero, has tardado 3 min en encontrarla tras hacr la pregunta. La proxima vez emplea mas tiempo en buscar la solucion antes de publicar la pregunta. Un saludo
    – lois6b
    Commented el 23 mar. 2017 a las 12:07
  • 1
    Disculpa, fallo mío. Perdí la paciencia. Ha sido raro XD porque me he pasado más de una hora buscando y hasta que no he hecho la pregunta no se me ha ocurrido como buscarlo en google XD
    – Joracosu
    Commented el 23 mar. 2017 a las 12:09
  • 3
    Nada, no te disculples. Estas cosas pasan. Tras perder la paciencia, haces un descanso y mas tarde vuelves a intentarlo. Puede que tengas otro punto de vista como te pasó tras publicar la pregunta. Esta foto lo representa muy bien
    – lois6b
    Commented el 23 mar. 2017 a las 12:16

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.