¿Cómo encontrar o verificar si un libro de trabajo específico está abierto o no en Excel?
Es posible que abras varios libros de trabajo a la vez. Si necesitas verificar si un libro de trabajo específico está actualmente abierto, VBA proporciona una solución sencilla. Esta guía te mostrará cómo usar un código VBA para determinar rápidamente si un libro de trabajo está abierto o no.
Verificar si un libro de trabajo está abierto o no en Excel
Verificar si un libro de trabajo está abierto o no en Excel
Puedes hacer lo siguiente para verificar si un libro de trabajo está abierto o no en Excel.
1. Presiona Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones. En la ventana de Microsoft Visual Basic para Aplicaciones, haz clic en Insertar > Módulo.
2. Luego, copia y pega el siguiente código VBA en el editor.
Código VBA: encuentra si un libro de trabajo está abierto
Sub TrimExcessSpaces()
Dim xWBName As String
Dim xWb As Workbook
On Error Resume Next
xTitleId = "KutoolsforExcel"
xWBName = Application.InputBox("Workbook Name", xTitleId, "", Type: = 2)
Set xWb = Application.Workbooks(xWBName)
If xWb Is Nothing Then
MsgBox "The Workbook is not open!"
Else
MsgBox "The Workbook is open!"
End If
End Sub3. Ahora presiona la tecla F5 para ejecutar el código. En el cuadro de diálogo emergente de KutoolsforExcel, ingresa el nombre del libro de trabajo que deseas verificar y luego haz clic en el botón Aceptar. Ver captura de pantalla:
Si el libro de trabajo especificado está abierto, aparecerá un cuadro de diálogo indicándote que el libro de trabajo está abierto;
De lo contrario, obtendrás el siguiente cuadro de diálogo si el libro de trabajo especificado no está abierto.
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos