Desproteger una hoja protegida con clave

Desproteger una hoja protegida con clave

Este truco te permitirá desproteger hojas protegidas con clave.

Funciona al menos en la versión 3.2.

Es un error garrafal de OOo, que debería subsanarse cuanto antes.

Tan sólo necesitas una macro de pocas líneas y si lo deseas, asignarla a un botón.

 

 

Deberás escribir una macro como la que aquí proponemos que proteja de nuevo la hoja activa con ninguna contraseña, o con una a tu elección, y ejecutarla.

La siguiente macro protege la hoja activa de nuevo con una contraseña en blanco, para a continuación, desprotegerla.

Puedes muy fácilmente asignarla a un botón en Calc para tenerla siempre disponible.

Sub DesprotegerHoja( )
'Desproteje una hoja aunque estuviera protegida con contraseña
dim oDoc as object

    oDoc = StarDesktop.CurrentComponent
    if oDoc.supportsService("com.sun.star.sheet.SpreadsheetDocument") then
        with ThisComponent.getCurrentController.getActiveSheet()
            .Protect( "")
            .unProtect( "")
            if not .isProtected() then
                msgbox "La hoja ha sido desprotegida", 48, "Trucos de www.open-office.es"
            else
                msgbox "Lo sentimos, pero no se pudo desproteger la hoja; " & _
                       "han corregido el error", 48, "Bien por OOo"
            end if
         end with
    end if
   
end sub

8 comentarios

Comentario De: Raul [Visitante]

Maravilloso!!! me funcionó a la primera.

Me vino de perlas. Era un Excel protegido que abrí en Openoffice. Diversas pruebas no me funcionaron. La tuya a la primera.

mil gracias,

25.08.11 @ 02:22 Reply to this comment
Comentario De: Charly [Visitante]

Muchas gracias, la macro funciona perfecto y es muy rápida.

Saludos!!

28.04.15 @ 23:28 Reply to this comment
Comentario De: LexPat [Visitante]

EXCELENTE aporte y muy rápido, lo que no se pudo hacer en el excel se lo logró en Calc

08.02.18 @ 03:52 Reply to this comment
Comentario De: Ale [Visitante]

Por favor quisiera saber exactamente pasó a pasó como desbloquear una hoja en openoffice 3.2 por favor

15.05.18 @ 18:50 Reply to this comment
Comentario De: Mynos1802 [Visitante]

Comentario De: LexPat [Visitante]
EXCELENTE aporte y muy rápido, lo que no se pudo hacer en el excel se lo logró en Calc

08.02.18 @ 02:52

Este no sabe usar Excel!!!! jajajajaaj

Comentario De: Miriam [Visitante]

Necesito desbloquear una hoja calc con contraseña, tengo que imprimir y esta desconfigurada. Puede ser que indique paso a paso. Gracias!!

08.06.20 @ 18:34 Reply to this comment
Comentario De: WAY SOL [Visitante]

No me abre me dice insertar objeto

27.07.20 @ 10:59 Reply to this comment
Comentario De: Gaston [Visitante]  

Buenas qué tal? tengo una duda con respecto a éste artículo de: "Desproteger una hoja protegida con clave" Es que tengo un archivo .ods y olvidé la clave, con ésta programación que plantean podría yo abrirlo??? y en tal caso a dónde es que programo con esa programación que no entendí.
Desde ya Muchas Gracias!!!

20.11.20 @ 05:28 Reply to this comment

Esta publicación tiene 1 reacción esperando moderación...


Form is loading...