HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Beenden ohne speichern

Beenden ohne speichern
25.09.2003 14:52:31
Goldi
Hallo Miteinander,
mein Problem: Mit Exel 2000 wurde eine Arbeitsmappe erstellt, um Formulare auszudrucken. diese Datei soll nie geändert werden. Wie kann ich beim Beenden die Meldung unterdrücken, die mich fragt, ob ich speichern will?
Danke im Vorraus.

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

Betreff
Datum
Benutzer
AW: Beenden ohne speichern
25.09.2003 15:02:22
Matthias G
Hallo "Goldi" (schöner Name!),

folgenden Code in "DieseArbeitsmappe":

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.Saved = True
Cancel = True
End Sub

Gruß,
Matthias
AW: Sorry, was vergessen...
25.09.2003 15:06:31
Matthias G
Hallo nochmal.

Dies habe ich vergessen, auf das gleiche Blatt:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Saved = True
End Sub

Wenn du die Datei mit Datei->Speichern noch Speichern lassen willst, genügt sogar der obige Code. Den aus der ersten Antwort dann weglassen!
Grüße,
Matthias
Danke
25.09.2003 15:24:18
Goldi
Hallo Matthias, Danke funktioniert perfect!!
AW: Bitte, gern geschehen - o.T.
25.09.2003 15:29:12
Matthias G
-

Meistgelesene Forumthreads (12 Monate)