|
Es posible que en nuestro día a
día, trabajemos con documentos que consten de algún logo corporativo o imagen
que no deseamos que sea modificado. Muchas veces nos habremos preguntado cómo
proteger esa imagen, impidiendo que sea eliminada, copiada, o movida de la
ubicación que nosotros hemos destinado para nuestro logo, pero permitiendo, que
el usuario pueda modificar el resto del documento. En este artículo os
enseñamos como hacerlo.
En primer lugar debemos crear un
documento en blanco en el que insertaremos nuestra imagen, bien como elemento
del encabezado del documento, o bien como un elemento más de nuestro documento,
e insertaremos a continuación un salto de sección continuo,
En Insertar Salto /Salto de Sección Continuo,
Lo tenemos en Diseño de Página en
el grupo Configuración de Página, seleccionamos, Salto y seleccionamos a continuación, Continuo
Solo nos restará ejecutar esta
macro, insertando el código que os exponemos a continuación en VBA en el
apartado "thisdocument", lo cual al abrir el documento ya entra en accion
nuestra protección:
Private Sub Document_Open()
On Error Resume Next
ActiveDocument.Unprotect ("111")
ActiveDocument.Sections(2).ProtectedForForms = False
ActiveDocument.Protect _
Type:=wdAllowOnlyFormFields,
Password:="111"
On Error GoTo 0
End Sub
Si lo queremos poner en un Modulo [Desde Visual Basic , Menú
Insertar > Módulo]
Sub Proteger_Imagen()
On Error Resume Next
ActiveDocument.Unprotect ("111")
ActiveDocument.Sections(2).ProtectedForForms = False
ActiveDocument.Protect _
Type:=wdAllowOnlyFormFields,
Password:="111"
On Error GoTo 0
End Sub
Insertándolo como módulo tendremos que
ejecutar nuestra macro para proteger nuestra imagen,
Y eso es todo amigos, nuestra imagen
quedará protegida siempre que la ubiquemos antes del salto de sección continuo,
cualquier duda o comentario adicional
que tengáis, podéis preguntar en nuestro foro
{jos_sb_discuss:6}
En nuestra sección de descargas teneis un archivo de ejemplo en el que se muestra esta funcionalidad,
Trackback(0)
 |