如何在Excel中查找或檢查特定工作簿是否打開？

您可能一次打開多個工作簿。 用於查找或檢查特定工作簿是否已打開。 在這裡，我們將向您介紹如何使用VBA檢查工作簿是否已打開。

檢查工作簿是否在Excel中打開

---

檢查工作簿是否在Excel中打開

您可以按照以下步驟檢查工作簿是否在Excel中打開。

1。 按 其他 + F11 打開 Microsoft Visual Basic for Applications 窗口。 在裡面 Microsoft Visual Basic for Applications 窗口中，單擊 插入 > 模塊.

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 鍵來運行代碼。 在彈出 Kutoolsfor Excel 對話框中，輸入要檢查的工作簿名稱，然後單擊 OK 按鈕。 看截圖：

如果打開了指定的工作簿，則會彈出一個對話框，通知您該工作簿已打開；

否則，如果未打開指定的工作簿，則將顯示以下對話框。