Wie prüfen Sie schnell, ob eine Datei (Arbeitsmappe) in Excel geöffnet oder geschlossen ist?
Im täglichen Excel-Arbeitsablauf öffnen Sie gleichzeitig mehrere Arbeitsmappen, um effizient zu arbeiten. Doch bei Hunderten von Dateien behalten Sie leicht den Überblick, ob eine bestimmte Arbeitsmappe geöffnet oder geschlossen ist. Verzichten Sie auf die umständliche manuelle Prüfung einzelner Dateien – im Folgenden zeige ich Ihnen praktische Tricks, mit denen Sie blitzschnell erkennen, ob eine Arbeitsmappe geöffnet oder geschlossen ist.
Prüfen, ob eine Arbeitsmappe geöffnet oder geschlossen ist, mithilfe von VBA
Prüfen, ob eine Arbeitsmappe geöffnet oder geschlossen ist, mit Kutools für Excel 
Prüfen, ob eine Arbeitsmappe geöffnet oder geschlossen ist, mithilfe von VBA
Hier finden Sie einen VBA-Code, mit dem Sie prüfen können, ob eine bestimmte Arbeitsmappe geöffnet oder geschlossen ist.
1. Drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul und kopieren Sie anschließend den VBA-Code in das neue Modul-Fenster.
VBA: Prüfen, ob eine Arbeitsmappe geöffnet oder geschlossen ist
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 Sub3. Drücken Sie anschließend die Taste F5, um das VBA-Skript auszuführen. Es erscheint ein Dialogfeld, das Sie darüber informiert, ob die betreffende Arbeitsmappe geöffnet ist oder nicht.
Tipp: Im obigen VBA-Code steht „combine“ für den Namen der Arbeitsmappe, die Sie prüfen möchten. Passen Sie diesen Namen einfach nach Bedarf an.
Prüfen, ob eine Arbeitsmappe geöffnet oder geschlossen ist, mit Kutools für Excel
Falls Sie mit VBA nicht vertraut sind, können Sie prüfen, ob eine Arbeitsmappe geöffnet ist, indem Sie Kutools für Excel zusammen mit dessen Navigations-Bereich verwenden, der Ihnen ermöglicht, alle geöffneten Arbeitsmappen übersichtlich in der Arbeitsmappenliste des Bereichs anzuzeigen.
Nachdem Sie Kutools für Excel kostenlos installiert haben, gehen Sie wie folgt vor:
1. Klicken Sie auf Kutools > Navigation, um die Navigation zu aktivieren. Siehe Screenshot:
2. Klicken Sie anschließend auf die Schaltfläche Arbeitsmappe und Blatt, um den Bereich zu erweitern und zum Abschnitt Arbeitsmappe und Blatt zu wechseln. Dort sehen Sie alle geöffneten Arbeitsmappen in der oberen Liste. Siehe Screenshot:
Mithilfe des Navigationsbereichs können Sie außerdem schnell zwischen den in der Liste aufgeführten Arbeitsmappen oder Blättern wechseln.
Klicken Sie hier, um mehr über die Navigation zu erfahren.
Demo: So erstellen Sie eine dynamische Liste mit Blattnamen in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins