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.
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