Gruppe
Datei
Problem
Wie kann ich alle Arbeitsmappen außer der aktiven schließen, ohne sie zu speichern und ohne eine diesbezügliche Abfrage?
StandardModule: basMain
Sub Schliessen()
Dim wkb As Workbook
For Each wkb In Workbooks
If wkb.Name <> ThisWorkbook.Name Then
wkb.Close savechanges:=False
End If
Next wkb
End Sub