vielleicht kann mir mal jemand helfen.
Ich habe, bedingt durch mehrere gleichzeitige Arbeiten, mehrere Excel-Dateien, die unterschiedliche Namen haben können (z.B. Tabelle 23 Tabelle 31 usw.) geöffnet. Ich möchte nun, dass eine Datei, deren Namen ich immer weiß (LVB_Süd.xls) und die gerade akive Datei, offen bleiben und alle anderen geschlossen werden, wenn möglich ohne Rückfrage nach Speicherung.
Ich habe leider aus dem Buch von Bernd Held nur eine Lösung gefunden, bei der nur die aktive Mappe offen bleibt. Hier als Hilfe der Code:
Sub allemappenbisaufdieaktiveschliessen()
Dim Mappe as Workbook
For Each Mappe In Application.Workbooks
If Mappe.Name <> Thos Workbook.Name Then Mappe.Close
Next
End sub
Kann mir jemand helfen?
Grüße
Elmar