MsgBox mit zwei Button
05.08.2003 12:24:05
Ulf
Hier der Code
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
MsgBox "efw", vbYesNo
If vbNo Then
ActiveWindow.Close
End If
If vbYes Then
Application.Dialogs(xlDialogSendMail).Show
End If
End Sub
danke für eure Hilfe
ulf