El Método Cerrar y Abrir en Excel VBA se puede utilizar para cerrar y abrir libros de trabajo. Recuerda que la colección de libros de trabajo contiene todos los objetos de libros de trabajo que están actualmente abiertos.
Coloca un botón de comando en tu hoja de trabajo y añade las siguientes líneas de código:
1. La línea de código de abajo cierra cierra-abre.xlsm.
Cuadernos de trabajo(«closee-open.xlsm»).Close
2. La línea de código de abajo cierra el primer libro de trabajo abierto/creado.
Cuadernos de trabajo(1).Cerrar
3. La línea de código de abajo cierra el libro de trabajo activo.
ActiveWorkbook.Close
4. La línea de código de abajo cierra todos los libros de trabajo que están actualmente abiertos.
Cuadernos de trabajo. Cerrar
5. La línea de código de abajo abre sales.xlsx.
Libros de trabajo. Abiertos («sales.xlsx»)
Nota: sólo puede abrir sales.xlsx sin especificar la ruta del archivo si está almacenado en su ubicación de archivo predeterminada. Para cambiar la ubicación de archivo predeterminada, en la pestaña Archivo, haga clic en Opciones, Guardar.
6. También puedes usar el método GetOpenFilename del objeto Application para mostrar el cuadro de diálogo estándar Open.
Dim MyFile As String MyFile = Aplicación.GetOpenFilename()
7. 8. Selecciona un archivo y haz clic en Abrir.
Nota: GetOpenFilename no abre el archivo.
8. A continuación, puede abrir el libro de trabajo como de costumbre.
Libros de trabajo. Abrir (MiArchivo)