Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
812to816
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
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Alle Dateien beim schließen speichern

Alle Dateien beim schließen speichern
23.10.2006 12:13:44
Erich
Hallo Excelaner....
Habe auch nach längeren suchen nichts passendes gefunden.
Meine Kollegen und ich müssen mit mehreren Dateien arbeiten.
Ob Unwissendheit oder Faulheit eine Rolle spielt weiß ich nicht.
Es sollte ja so sein, daß man immer nur eine Datei offen hat.
Nun kommt es vor, das der eine, ein oder zwei Dateien offen hat und sich wundert
das beim beenden nicht alles gespeichert wird.
Gibt es einen Code der beim beenden alle Dateien speichert ?
Ich hoffe ich habe mich verständlich ausgedrückt.
Gruss Erich

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Dateien beim schließen speichern
23.10.2006 12:22:43
Sigi
Hi Erich,
so sollte es gehen ...

Sub AlleMappenSpeichernUndSchließen()
Dim WB As Workbook
For Each WB In Application.Workbooks
If WB.Name <> ThisWorkbook.Name Then
WB.Close True  'oder "False", falls nicht gesichert werden soll
End If
Next WB
ThisWorkbook.Save
ThisWorkbook.Close
End Sub

Gruß
Sigi
AW: Alle Dateien beim schließen speichern
23.10.2006 12:32:09
Erich
Hallo Sigi
Vielen Dank, klappt perfekt, die Daten werden gespeichert.
Wie muß ich den Code ändern damit die Datei auch beendet wird.
Mit Application.Quit klappt es nicht.
Nochmals Danke.
Gruss Erich
AW: Alle Dateien beim schließen speichern
23.10.2006 12:44:00
Sigi
Hi Erich,
so sollte es gehen ...

Sub Excel_Schließen()
Dim WB As Workbook
For Each WB In Application.Workbooks
If WB.Name <> ThisWorkbook.Name Then
WB.Close True
End If
Next WB
ThisWorkbook.Save
Application.Quit
End Sub

Gruß
Sigi
Anzeige
AW: Alle Dateien beim schließen speichern
23.10.2006 12:57:20
Erich
Hallo Sigi....
Beim beenden will Excel immer an Bill Gates einen Bericht senden.
Ist aber nicht so schlimm, irgend wie bekomme ich das hin.
Sigi nochmals Danke
Gruss Erich

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige