speichert trotzdem
23.01.2009 21:54:00
Geri
Wäre jemand so nett und würde diesen Code überprüfen.
Wenn ich eine Aenderung durchführe und trotzdem die Datei nicht speichern will fragt Excel nochmals ob ich speichern will. Der Commandbutton befinden sich in einer Userform.
Was mache ich den falsch?
Private Sub CommandButton9_Click()
Select Case MsgBox("Sollen Ihre Änderungen gespeichert werden?", vbYesNo)
Case vbNo
ActiveWorkbook.Saved = True
Application.Quit
Exit Sub
Case vbYes
ActiveWorkbook.Save
Application.Quit
End Select
End Sub
Danke an Alle
Gruss
Geri