Wenn Sie gleichzeitig an mehreren Arbeitsmappen arbeiten und ein Makro benötigen, mit dem Sie alle inaktiven Arbeitsmappen ausblenden können, hilft Ihnen dieser Artikel auf jeden Fall.

In diesem Artikel konzentrieren wir uns darauf, wie wir mehrere Arbeitsmappen ausblenden können, die Sie derzeit nicht verwenden.

Frage: Ich muss schnell alle Excel-Dateien mit Ausnahme der aktuell verwendeten ausblenden, damit ich reibungslos zwischen anderen Anwendungen wechseln kann. Ich möchte VBA-Code für diese einzigartige Anforderung von mir suchen.

Um den Code zum Ausblenden aller inaktiven Arbeitsmappen zu erhalten, müssen Sie die folgenden Schritte ausführen, um den VB-Editor zu starten. Klicken Sie auf die Registerkarte Entwickler. Wählen Sie in der Gruppe Code Visual Basic

img1

aus * Kopieren Sie den folgenden Code in das Arbeitsblattmodul

Sub HideInactiveExcelWorkbooks()

Application.ScreenUpdating = False

Dim aWin As Window

Set aWin = ActiveWindow

Dim win As Window

For Each win In Application.Windows

win.Visible = False

Next win

aWin.Visible = True

Application.ScreenUpdating = True

End Sub

img2

  • Mit dem obigen Code werden alle inaktiven Arbeitsmappen sofort ausgeblendet. Hinweis: Das obige Makro verbirgt keine aktiven Arbeitsmappen.

Um alle Arbeitsmappen einzublenden, müssen Sie die folgenden Schritte ausführen:

Klicken Sie auf die Registerkarte Ansicht. Klicken Sie auf Einblenden

img3

  • Dies zeigt die ausgeblendeten Arbeitsmappen

img4

an Wenn Sie jede auswählen und auf OK klicken, wird die Arbeitsmappe ausgeblendet. Schlussfolgerung: * Wir können Hunderte von Arbeitsmappen ausblenden, die mit einem einzigen Klick unter Verwendung des obigen Makrocodes nicht aktiv sind.

image 48 If you liked our blogs, share it with your friends on Facebook. And also you can follow us on Twitter and Facebook.

Wir würden gerne von Ihnen hören, lassen Sie uns wissen, wie wir unsere Arbeit verbessern, ergänzen oder innovieren und für Sie verbessern können. Schreiben Sie uns an [email protected]