¿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 Sub

3. 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.