30 Macros Útiles y Sencillas: Impedir Guardar el Libro de Trabajo

En términos de seguridad, con un adecuado uso de las macros podemos tener aplicaciones de muy buenos resultados. Ahora vamos a ver una macro con la cual podemos restringir que nuestro libro de trabajo sea guardado.

Lo primero que vamos a hacer es ingresar al Editor de Visual Basic y para ello desde la primera hoja utilizaremos la combinación de teclas Alt + F11:

Nos ubicamos en la ventana del Explorador de Proyectos que tenemos en el panel izquierdo de la ventana del Editor de Visual Basic y damos doble clic sobre el Objeto ThisWorkbook y pegamos el siguiente código:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

MsgBox "No esta permitido guardar este libro de trabajo"

Cancel = True

End Sub

La primea línea marca el principio de la macro y vamos a desglosar esta línea para entender un poco mejor esta macro:

Private Sub: significa Subrutina (Sub) o macro de acceso Privado (Private) y este acceso se aplica cuando se intenta ejecutar desde otra macro.

Workbook: Corresponde a la indicación de que la macro se aplicará sobre el libro de Excel (Workbook).

BeforeSave: Corresponde al evento antes de Guardar, es decir, cuando se intente guardar el libro de trabajo, antes de ejecutar dicha acción, vamos a aplicar unas líneas de código.

(ByVal SaveAsUI As Boolean, Cancel As Boolean): Es la definición de dos posibles resultados que puede retornar el uso de esta macro y son de tipo booleano.

En resumen, esta primera línea se interpreta como macro que se ejecutará antes de poder guardar el libro de trabajo.

La segunda línea es el código con el cual se esta enviando un cuadro de mensaje informando la imposibilidad de guardar el libro de trabajo.

Y la tercera línea es la instrucción de cancelar la acción de guardar el libro de trabajo.

La última línea End Sub marca el final de la macro

Ahora vamos a Excel y probemos guardando el libro de trabajo:

Ctrl + G:

Ahora realizando Guardar Como:

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

Una opinión
  1. elkin dice:

    con esta macro podria hacer que al dar clck en cancelar abriera la opcion guardar como?? y permita guardar con otro nombre y otra extencion *xls

    Gracias

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc. Lo que no está permitido es insultar o escribir palabras ofensivas o soeces. Si lo hace, su comentario será rechazado por el sistema o será eliminado por el administrador. Por último, trate de no escribir en mayúscula sostenida, resulta muy difícil leerle.