Datei über x schliessen verhindern/abfangen
07.04.2005 12:15:22
Heinz
ich habe eine Exceldatei welche eine before-close Funktion hat.
Diese soll bewirken dass eine bestimmte Konstellation eingestellt wird bevor die Datei geschlossen wird.
Das funktioniert bei Alt F4 und über Menu "Datei"-"schliessen" einwandfrei. Allerdings wenn ich die Datei über das X oben rechts schliesse nicht.
Der Code sieht folgendermaßen aus:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("Tabelle1").Visible = True
Worksheets("Tabelle2").Visible = xlVeryHidden
End Sub
Wie kann ich das Schliessen über X abfangen oder auch ganz verhindern?
Gruß und danke Heinz