Save Prompt

[Dilly]

I have created a form to create new logistics requests. I want the system to prompt when the form is closed to ask whether or not saving is required. I have tried to create a macro but it still does not ask a question.

 

[krispi]

Hi Dilly, try the following in the BeforeUpdate event of your form (obviously, you can enter whaterver text you want between the quotes):

Private Sub Form_BeforeUpdate(Cancel As Integer)

Dim msg, style, title, response
msg = ("Do you want to save this request?&quot
style = vbYesNo + vbQuestion
title = "Save Request?"
response = MsgBox(msg, style, title)
If response = vbNo Then
Me.Undo
Else
Exit Sub
End If
End Sub