¿Cómo encontrar o verificar si un libro específico está abierto o no en Excel?

Puede abrir varios libros de trabajo a la vez. Para averiguar o comprobar si un libro específico está abierto o no. Aquí le presentaremos cómo usar un VBA para verificar si un libro de trabajo está abierto o no.

Compruebe si un libro de trabajo está abierto o no en Excel

---

Compruebe si un libro de trabajo está abierto o no en Excel

Puede hacer lo siguiente para verificar si un libro de trabajo está abierto o no en Excel.

1. presione el otro + F11 para abrir el Microsoft Visual Basic para aplicaciones ventana. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo.

2. Luego copie y pegue el siguiente código VBA en el editor.

Código VBA: busque si se abre un libro de trabajo

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 presione el F5 clave para ejecutar el código. En el apareciendo KutoolsforExcel cuadro de diálogo, ingrese el nombre del libro de trabajo que desea verificar y luego haga clic en el OK botón. Ver captura de pantalla:

Si se abre el libro de trabajo especificado, aparecerá un cuadro de diálogo que le indicará que el libro de trabajo está abierto;

De lo contrario, obtendrá un cuadro de diálogo a continuación si no se abre el libro de trabajo especificado.