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
• Etiquetas: clave, contraseña, desproteger, hoja, password, proteger
• 07.01.11 •
9 comentarios » 9 comentarios
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,
Muchas gracias, la macro funciona perfecto y es muy rápida.
Saludos!!
EXCELENTE aporte y muy rápido, lo que no se pudo hacer en el excel se lo logró en Calc
Por favor quisiera saber exactamente pasó a pasó como desbloquear una hoja en openoffice 3.2 por favor
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
Necesito desbloquear una hoja calc con contraseña, tengo que imprimir y esta desconfigurada. Puede ser que indique paso a paso. Gracias!!
No me abre me dice insertar objeto
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!!!
Hola!
Tengo la versión 7.2.4.1. de LibreOffice. Cuando introduzco esta macro, me da el siguiente error:
Error de ejecución de BASIC.
Se ha producido una excepción
Type: com.sun.star.lang.IllegalArgumentException
Message: .
¿Alguien podría ayudarme?
Gracias!