Email on save
Hi Auric,
Am Wed, 27 Jul 2016 18:15:27 -0000 (UTC) schrieb Auric__:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
saved = True
If MsgBox("Generate email?", vbYesNoCancel) = vbYes Then generateEmail
End Sub
it is a good idea to use a MsgBox. But it is also annoying when the
MsgBox appears 600 times.
Maybe it is better to put the code in the WorkBook_BeforeClose event.
Regards
Claus B.
--
Windows10
Office 2016
|