Hoe vind of controleer ik of een specifieke werkmap al dan niet geopend is in Excel?

Mogelijk opent u meerdere werkmappen tegelijk. Om erachter te komen of te controleren of een specifieke werkmap open is of niet. Hier laten we u zien hoe u een VBA gebruikt om te controleren of een werkmap open is of niet.

Controleer of een werkmap open is of niet in Excel

Controleer of een werkmap open is of niet in Excel

U kunt als volgt controleren of een werkmap al dan niet geopend is in Excel.

1. druk de anders + F11 om de te openen Microsoft Visual Basic voor toepassingen venster. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module.

2. Kopieer en plak vervolgens de onderstaande VBA-code in de editor.

VBA-code: zoek of een werkmap is geopend

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. Druk nu op de F5 sleutel om de code uit te voeren. Bij het opduiken KutoolsvoorExcel dialoogvenster, voer de werkmapnaam in die u wilt controleren en klik vervolgens op het OK knop. Zie screenshot:

Als de opgegeven werkmap wordt geopend, verschijnt er een dialoogvenster waarin staat dat de werkmap is geopend;

Anders krijgt u een dialoogvenster hieronder als de opgegeven werkmap niet is geopend.