Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1508to1512
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle Arbeitsmappen bis auf die aktive schließen

Alle Arbeitsmappen bis auf die aktive schließen
17.08.2016 11:18:54
Sascha
Hallo allerseits,
ich habe eine wahrscheinlich sehr triviale Frage:
Wie kann ich per VBA alle Arbeitsmappen bis auf die aktive schließen?
Vielen Dank im Voraus für eure Hinweise und Hilfe.
Gruß
Sascha

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Alle Arbeitsmappen bis auf die aktive schließen
17.08.2016 11:29:17
Nepumuk
Hallo,
teste mal:
Option Explicit

Public Sub Test()
    Dim objWorkbook As Workbook
    For Each objWorkbook In Application.Workbooks
        If Not objWorkbook Is ActiveWorkbook Then _
            Call objWorkbook.Close(SaveChanges:=False)
    Next
End Sub

Gruß
Nepumuk
Anzeige
Alle Arbeitsmappen bis auf die aktive schließen
17.08.2016 13:11:53
Sascha
Hallo Nepumuk,
vielen dank für die schnelle Antwort,
hat alles super funktioniert.
Danke nochmal.
Gruß
Sascha

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige