如何在Excel中查找或检查特定工作簿是否已打开？

您可能一次打开多个工作簿。 用于查找或检查特定工作簿是否已打开。 在这里，我们将向您介绍如何使用VBA检查工作簿是否已打开。

检查工作簿是否在Excel中打开

---

检查工作簿是否在Excel中打开

您可以按照以下步骤检查工作簿是否在Excel中打开。

1。 按 其他 + F11 打开 Microsoft Visual Basic应用程序 窗口。 在里面 Microsoft Visual Basic应用程序 窗口中，单击 插页 > 模块.

2.然后将下面的VBA代码复制并粘贴到编辑器中。

VBA代码：查找是否打开了工作簿

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.现在按 F5 键来运行代码。 在弹出 KutoolsForexcel. 对话框中，输入要检查的工作簿名称，然后单击 OK 按钮。 看截图：

如果打开了指定的工作簿，则会弹出一个对话框，通知您该工作簿已打开；

否则，如果未打开指定的工作簿，则将显示以下对话框。