Cómo utilizar VBA para proteger objetos de dibujo

Microsoft Excel le permite crear objetos y formas para mejorar la forma de mostrar los datos. Con la paleta de " formas" del programa, usted puede crear fácilmente ilustraciones y diagramas . Hay ocasiones en las que podría verse en la necesidad de proteger a estos " objetos de dibujo " para evitar que los usuarios de la manipulación con ellos. Usted puede hacer esto haciendo clic derecho en cada objeto , lo que permite la propiedad de " bloqueo" , y el bloqueo de la misma hoja de cálculo utilizando una contraseña. Con Visual Basic para Aplicaciones ( VBA) , se puede condensar estos pasos en una macro que le ayuda a proteger varios objetos de dibujo rápido. Instrucciones
1

Inicie Microsoft Excel. Pulse la tecla "Ctrl " y "O" Seleccione el nombre del libro que contiene los objetos de dibujo , haga clic en " Abrir".
2

Pulse " Alt " y " F8 ". Tipo " Proteger" en el " Nombre de la macro " cuadro , haga clic en " Crear". Esto abre el Editor de Visual Basic (VBE ) .
3

Escriba el siguiente código en el VBE . Reemplace "SECRET " con su contraseña preferida . Esta clave le ayudará a " desproteger " la hoja de trabajo y las formas más tarde.

Sub Proteger ( )

Set oSheet = ActiveSheet

For Each oShape En
oSheet.Shapes

oShape.Locked = True

Siguiente oShape

oSheet.Protect _

Contraseña: = "secreto" , _

DrawingObjects : = True , _

Contenido: = True , _

Escenarios : = True End Sub

4

Pulse " Alt " y " Q" para cerrar el VBE .
5

Pulse " Alt " y " F8 " para abrir la ventana " Macros " de nuevo. Seleccione " Proteger" de la lista y haga clic en "Ejecutar ". Los objetos de dibujo y la hoja de ahora serán protegidas y aseguradas.