¿Cómo verificar rápidamente si un archivo (libro) está abierto o cerrado en Excel?
En su trabajo diario con Excel, abre varios libros simultáneamente, pero cuando son cientos, puede resultar difícil recordar si uno específico está abierto o cerrado. Olvídese del método tradicional de revisar los archivos uno por uno; aquí le presentamos trucos para identificar rápidamente si un libro está abierto o cerrado.
Compruebe si un libro está abierto o cerrado con VBA
Compruebe si un libro está abierto o cerrado con Kutools para Excel 
Compruebe si un libro está abierto o cerrado con VBA
A continuación, encontrará un código VBA que puede ejecutar para verificar si un libro determinado está abierto o cerrado.
1. Pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo y, a continuación, copie y pegue el código VBA en la nueva ventana del Módulo.
VBA: Compruebe si un libro está abierto o cerrado
Function IsWorkBookOpen(Name As String) As Boolean
Dim xWb As Workbook
On Error Resume Next
Set xWb = Application.Workbooks.Item(Name)
IsWorkBookOpen = (Not xWb Is Nothing)
End Function
Sub Sample()
Dim xRet As Boolean
xRet = IsWorkBookOpen("combine.xlsx")
If xRet Then
MsgBox "The file is open", vbInformation, "Kutools for Excel"
Else
MsgBox "The file is not open", vbInformation, "Kutools for Excel"
End If
End Sub3. A continuación, pulse la tecla F5 para ejecutar este código VBA; aparecerá un cuadro de diálogo indicándole si el libro especificado está abierto o no.
Consejo: En el código VBA anterior, “combine” es el nombre del libro de trabajo que desea comprobar; puede modificarlo según sus necesidades.
Compruebe si un libro está abierto o cerrado con Kutools para Excel
Si no está familiarizado con VBA, puede comprobar si un libro está abierto mediante Kutools para Excel, gracias a su panel de Navegación, que le permite visualizar claramente todos los libros abiertos en la sección «Lista de libros» del panel.
Después de instalar gratuitamenteKutools para Excel, siga estos pasos:
1. Haga clic en Kutools > Navegación para activar la Navegación. Vea la captura de pantalla:
2. A continuación, haga clic en el botón Libro y Hoja para expandir el panel e ir a la sección de Libro y Hoja. Allí podrá ver todos los libros abiertos en la lista superior. Vea la captura de pantalla:
Con el panel de Navegación, también puede cambiar rápidamente entre los libros u hojas de la lista.
Haga clic aquí para descubrir todo sobre Navegación.
Demostración: ¿Cómo crear una lista dinámica con los nombres de las hojas en Excel?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos