Excel über Schaltfl. beenden, nicht über x
16.06.2004 14:55:49
Stefan
seit heute muß ich mich nicht mehr mit Excel 5.0 herumschlagen.
Da eröffnen sich doch gleich neue Möglichkeiten (und auch Probleme).
Ich habe eine Schaltfläche welche ein Makro zur Beendigung von Excel
aufruft. Nun möchte ich, daß die Beendigung nur über dies Makro funktioniert und nicht über das X oder Datei beenden, weil im Hintergrund noch einiges anderes passiert. Zum abfangen habe ich folgenden Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "Bitte beenden Sie das Programm über die Schaltfläche Beenden !", vbOKOnly + vbExclamation
Cancel = True
Exit Sub
End Sub
Jedoch geht dann auch das beenden über die Schaltfläche nicht mehr.
Könnt Ihr mir sagen, was ich falsch gemacht habe ?
Danke für die Hilfe.
Gruß Stefan
Anzeige