El primer y el método abierto en Excel VBA se pueden utilizar para libros de cierre y apertura. Recuerde, la colección de libros de trabajo contiene todos los objetos libro que están actualmente abiertos.

Coloque un botón de comando en la hoja de trabajo y añadir las líneas de código siguientes:

  1. La línea de código siguiente se cierra primer open.xlsm.

Workbooks("close-open.xlsm").Close

  1. La línea de código de abajo cierra el libro abrió por primera vez / creado.

Workbooks(1).Close

  1. La línea de código de abajo cierra el libro activo.

ActiveWorkbook.Close

  1. La línea de código siguiente se cierra todos los libros que están actualmente abiertos.

Workbooks.Close

  1. La línea de código siguiente abre sales.xlsx.

Workbooks.Open ("sales.xlsx")

Nota: se puede sales.xlsx sólo abre sin especificar la ruta del archivo si se almacena en la ubicación del archivo por defecto. Para cambiar la ubicación predeterminada del archivo, en la ficha Archivo, haga clic en Opciones, Guardar.

  1. También puede utilizar el método GetOpenFilename del objeto Application para mostrar el cuadro de diálogo Abrir estándar.

Dim MyFile As String

MyFile = Application.GetOpenFilename()

  1. Seleccione un archivo y haga clic en Abrir.

GetOpenFilename Method

Nota: GetOpenFilename en realidad no abrir el archivo.

  1. A continuación, se puede abrir el libro como de costumbre.

Workbooks.Open (MyFile)