¿cómo comprobar si un libro está abierto a través de vba?
Para verificar si un libro de trabajo está abierto usando cualquier código VBA, debe usar FOR CADA bucle que puede recorrer todos los libros de trabajo abiertos en ese momento y verificar el nombre de cada libro de trabajo con el nombre que mencionó. Puede utilizar un cuadro de mensaje para obtener el resultado del bucle. O también puedes hacer el código para ingresar el resultado en una celda.
Compruebe SI un LIBRO DE TRABAJO está ABIERTO
- Primero, debes declarar las variables que se usarán en el código para crear un bucle.
- Utilice un cuadro de entrada para obtener el nombre del libro que desea buscar.
- Inicie el ciclo para revisar todos los libros abiertos.
- Escriba código con IF STATEMENT para verificar el nombre del libro con el nombre que ingresó en el cuadro de entrada y, una vez que el nombre coincida, activa el libro, muestra un cuadro de mensaje que dice que se encontró el libro y sale del procedimiento.
- Al final, complete el ciclo y use un cuadro de mensaje para mostrar un cuadro de mensaje si no se encontró nada.
Enlaces útiles: Ejecutar una macro – Grabador de macros – Editor de Visual Basic – Manual de macros personales
Aquí está el código completo.
Sub vba_check_workbook() Dim WB As Workbook Dim myWB As String myWB = InputBox(Prompt:="Enter the workbook name.") For Each WB In Workbooks If WB.Name = myWB Then WB.Activate MsgBox "Workbook Found!" Exit Sub End If Next WB MsgBox "Not Found" End Sub