Vamos a continuar con la aplicación del objeto Workbook utilizando sus Métodos y en esta ocasión veremos cómo se puede programar una macro para poder dar la instrucción de Cerrar Libro; con esto se presentará la ventana de opción que nos permite Guardar los cambios, No guarda cambios o Cancelar.
Cerrar libro de Excel con Vba.
Para lograr esto vamos a utilizar el Método Close.
Método Close: Con la aplicación de este método, lo que estamos indicando desde VBA es la opción de cerrar el libro de Excel; en caso de que el libro haya sufrido cambios desde la última vez que se guardó, el sistema presenta la ventana de diálogo donde pregunta si se desea guardar los cambios o cancelar la acción.
Desde Excel abrimos el Editor VBA (Alt + F11), insertamos un Módulo (Clic derecho sobre el proyecto Excel, Insertar, Módulo:
Ingresamos el siguiente código de la macro:
Sub MetodoCerrarLibro()
ThisWorkbook.Close
End Sub
Queda de la siguiente manera en el Módulo:
Veamos lo que significan cada una de las líneas:
- La primera línea Sub MetodoCerrarLibro (), indica el inicio de la macro.
- En la segunda línea estamos utilizando del Objeto ThisWorkbook el Método Close el cual nos permite ejecutar la instrucción de cerrar el libro.
- La última línea marca el fin (End) de la Macro o Subrutina (Sub).
Vamos a vincular esta macro a una autoforma que insertemos en la hoja con clic derecho, asignar macro:
Seleccionamos del listado de macros que tengamos en el libro, la macro MetodoCerrarLibro, clic en Aceptar y ahora al dar clic en este botón se ejecuta la instrucción de cerrar libro.
Guía Laboral 2024
Conozca sus derechos y obligaciones laborales como trabajador o como empleador, y evítese problemas. Ver más.
Forma de citar este artículo (APA):
Invitado. (2015, mayo 22). Macro para cerrar libro [Entrada de blog]. Recuperado de https://www.gerencie.com/macro-para-cerrar-libro.html
Necesito una macro para que me oculte las filas sobrantes de un listado de estudiantes al final del ultimo nombre, y si deseo agregar un nuevo estudiante, que me las muestre nuevamente y que automaticamente me ordene el listado en todas las hojas donde aparezcan los listados, gracias de antemano