Hoe controleer je snel of een bestand (werkboek) open of gesloten is in Excel?

Tijdens het dagelijkse werk in Excel open je meerdere werkboeken tegelijkertijd, maar soms kunnen honderden werkboeken je in de war brengen om te onthouden of een specifiek werkboek open of gesloten is. Laat de traditionele methode van het één voor één controleren van bestanden achterwege; hier introduceer ik je aan trucs om snel te zien of een werkboek open of gesloten is.

Controleer of een werkboek open of gesloten is met VBA

Controleer of een werkboek open of gesloten is met Kutools voor Excel

Controleer of een werkboek open of gesloten is met VBA

Hier is een stukje VBA-code dat je kunt uitvoeren om te controleren of een specifiek werkboek open of gesloten is.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik op Invoegen > Module en kopieer en plak vervolgens de VBA-code in het nieuwe modulevenster.

VBA: Controleer of een werkboek open of gesloten is

Function IsWorkBookOpen(Name As String) As Boolean
    Dim xWb As Workbook
    On Error Resume Next
    Set xWb = Application.Workbooks.Item(Name)
    IsWorkBookOpen = (Not xWb Is Nothing)
End Function

Sub Sample()
    Dim xRet As Boolean
    xRet = IsWorkBookOpen("combine.xlsx")
    If xRet Then
        MsgBox "The file is open", vbInformation, "Kutools for Excel"
    Else
        MsgBox "The file is not open", vbInformation, "Kutools for Excel"
    End If
End Sub

3. En druk F5 om deze VBA-code uit te voeren, en er verschijnt een dialoogvenster dat je eraan herinnert of het specifieke werkboek open is of niet.
    

Tip: In de bovenstaande VBA-code is “combine” de naam van het werkboek dat je wilt controleren, je kunt dit naar wens wijzigen.

Controleer of een werkboek open of gesloten is met Kutools voor Excel

Als je niet bekend bent met VBA, kun je controleren of een werkboek open is met Kutools voor Excel, met behulp van zijn Navigatiepaneel, waarmee je alle geopende werkboeken duidelijk kunt zien in de lijst van het paneel.

Na het gratis installeren van Kutools voor Excel, doe dan het volgende:

1. Klik Kutools > Navigatie om het Navigatiepaneel in te schakelen. Zie screenshot:

2. Klik vervolgens op Werkboek & Werkblad knop om het paneel uit te vouwen en te gaan naar Werkboek & Werkblad sectie. En je kunt alle geopende werkboeken zien in de bovenste lijst. Zie screenshot:

Met het Navigatiepaneel kun je ook snel schakelen tussen de werkboeken of werkbladen in de lijst.

Klik hier om meer te weten te komen over Navigatie.

Demo: Hoe maak je een dynamische lijst van werkbladnamen in Excel?