Hogyan lehet megtalálni vagy ellenőrizni, hogy egy adott munkafüzet nyitva van-e vagy sem az Excelben?

Megnyithat egyszerre több munkafüzetet. Megtudhatja vagy ellenőrizheti, hogy egy adott munkafüzet nyitva van-e vagy sem. Itt bemutatjuk, hogyan használhatja a VBA-t annak ellenőrzésére, hogy a munkafüzetek nyitottak-e vagy sem.

Ellenőrizze, hogy nyitott-e egy munkafüzet az Excel-ben

---

Ellenőrizze, hogy nyitott-e egy munkafüzet az Excel-ben

Az alábbiak szerint ellenőrizheti, hogy nyitott-e egy munkafüzet az Excel-ben.

1. megnyomni a más + F11 megnyitni Microsoft Visual Basic for Applications ablak. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok.

2. Ezután másolja és illessze be az alábbi VBA kódot a szerkesztőbe.

VBA kód: keresse meg, hogy nyitott-e egy munkafüzetet

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. Most nyomja meg a gombot F5 gombot a kód futtatásához. A felbukkanóban KutoolsforExcel párbeszédpanelen írja be az ellenőrizni kívánt munkafüzet nevét, majd kattintson a gombra OK gomb. Lásd a képernyőképet:

Ha a megadott munkafüzet megnyílik, megjelenik egy párbeszédpanel, amely arról tájékoztatja, hogy a munkafüzet nyitva van;

Ellenkező esetben az alábbi párbeszédpanel jelenik meg, ha a megadott munkafüzet nincs megnyitva.