Wie können Sie schnell alle Arbeitsmappen schließen – außer der aktiven?
Wenn mehrere Arbeitsmappen auf Ihrem Computer geöffnet sind und Sie nun alle schließen möchten – mit Ausnahme der aktiven Arbeitsmappe –, gibt es dann schnelle Möglichkeiten, diese Aufgabe zu erledigen, ohne jede einzelne Arbeitsmappe manuell zu schließen? In diesem Artikel stelle ich Ihnen einige einfache Methoden vor, mit denen Sie dies mit nur einem Klick lösen können.
Alle Arbeitsmappen außer der aktiven mit VBA-Code schließen
Alle Arbeitsmappen außer der aktiven mit Office Tab
Alle Arbeitsmappen außer der aktiven mit VBA-Code schließen
Mit dem folgenden VBA-Code schließen Sie im Handumdrehen alle geöffneten Arbeitsmappen – bis auf die aktive. So geht’s:
1. Aktivieren Sie die Arbeitsmappe, die geöffnet bleiben soll.
2. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
3. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Alle Arbeitsmappen außer der aktiven schließen
Private Sub CloseOtherWorkbook()
'Updateby Extendoffice
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
If Not (xWB Is Application.ActiveWorkbook) Then
xWB.Close
End If
Next
Application.ScreenUpdating = True
End Sub
4. Drücken Sie anschließend die Taste F5, um diesen Code auszuführen. Danach werden alle anderen Arbeitsmappen sofort geschlossen, während die aktive Arbeitsmappe geöffnet bleibt.
Alle Arbeitsmappen außer der aktiven mit Office Tab
Falls Sie an einem neuen Produkt interessiert sind –Office Tab–, können Sie damit mehrere Dokumente oder Dateien in einem einzigen Fenster mit Registerkarten öffnen. So schließen Sie mit einem Klick alle Arbeitsmappen – außer der aktiven. Erfahren Sie mehr und laden Sie Office Tab herunter.
Nach der Installation von Office Tabsehen Sie, dass alle geöffneten Arbeitsmappen in einem einzigen Fenster mit Registerkarten angezeigt werden (siehe Screenshot):
Klicken Sie dann auf die Registerkarte der Arbeitsmappe, die Sie geöffnet lassen möchten, klicken Sie mit der rechten Maustaste darauf und wählen Sie im Kontextmenü Andere schließen(siehe Screenshot):
Anschließend sehen Sie, dass nur Ihre aktuelle Arbeitsmappe geöffnet ist.
Verwandter Artikel:
Wie können Sie schnell alle Arbeitsmappen in Excel schließen?
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