Kann ich den Button X (Exit) irgendwie sperren
grüße Kai
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
End Sub
Private Sub CommandButton1_Click()
Application.EnableEvents = False
ThisWorkbook.Save
If Workbooks.Count > 1 Then
ThisWorkbook.Close
Else
Application.Quit
End If
End Sub