Ich denke fast, ich bin zu blöd, da ich in den zahlreichen Einträgen, die sich mit dem Thema befassen nichts gefunden habe. Ich muss also (erneut) folgendes Fragen:
Ich habe den close und den save Parameter in der Arbeitsmappe durch 'cancel=True' abgefangen - soweit so gut.
Jetzt habe ich folgendes Modul erstellt, in dem ich ausschließlich das Speichern und Verlassen durch eine Schaltfläche ermöglichen möchte:
Sub Speichern_Schliessen()
Application.ScreenUpdating = False
Application.EnableEvents = False
' Beim Start erstellte Befehlsleiste löschen
On Error Resume Next
Application.CommandBars("GLAZ").Delete
On Error GoTo 0
' Fenster-Titelleiste zurücksetzen
Application.Caption = Empty
' Datei beim Verlassen automatisch speichern
Application.CommandBars("Worksheet Menu Bar").Visible = True
ActiveWindow.DisplayHeadings = True
ActiveWorkbook.Protect Structure:=False, Windows:=False
Application.EnableEvents = True
Application.ScreenUpdating = True
On Error GoTo ERRORHANDLER
Application.CutCopyMode = False
ActiveWorkbook.Close True
Exit Sub
ERRORHANDLER:
MsgBox "Speichern nicht möglich!"
End Sub
Wichtig ist mir dabei, daß durch 'enableevents=false' die beforeclose und die beforesave Routinen übergangen werden. Jetzt schließt sich meine Datei jedoch nach 'ActiveWorbook.Close True' selbständig und läßt Excel im 'enableevents=false'-Zustand, so dass in der weiteren Arbeit kein VBA mehr ausgeführt wird.
Wie kann ich nach dem Schließen/Speichern enableevents wieder auf true setzen?
Vielen Dank schon jetzt für Unterstützung.
Falko