workbook_beforeclose zweimal ?
07.06.2007 13:44:00
Mathias
habe folgenden Code in "DieseArbeitsmappe" geschrieben:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim frage As Integer
frage = MsgBox("Änderungen speichern?", vbYesNo)
If frage = 7 Then
ActiveWorkbook.Close savechanges:=False
Else
ActiveWorkbook.Save
End If
End Sub
Beantworte ich die Frage mit Ja wird normal gespeichert und die Datei ohne weitere Rückfrage geschlossen.
Wenn ich die Abfrage mit Nein (frage = 7) beantworte, erscheint der Abfragedialog noch ein zweitesmal.
Wie kann ich die zweite Abfrage verhindern?
Vielen Dank für eure Antworten.
Viele Grüße
Mathias