G
Guest
The code below is called when by the On NO Data Event of a report. I need to
stop the report from running if the user selects NO, but leave the option
open to run a blank report. I am using a Public Function because I need to
call this from a large number of reports.
I am really looking for the line that will stop the report if the user
selects "Case vbNo". The "yes" is no problem since the report runs regardless
of the selection.
Public Function NoData()
Select Case MsgBox("Message", vbYesNo vbDefaultButton1, "MessageTitle")
Case vbYes
Case vbNo
End Select
End Function
stop the report from running if the user selects NO, but leave the option
open to run a blank report. I am using a Public Function because I need to
call this from a large number of reports.
I am really looking for the line that will stop the report if the user
selects "Case vbNo". The "yes" is no problem since the report runs regardless
of the selection.
Public Function NoData()
Select Case MsgBox("Message", vbYesNo vbDefaultButton1, "MessageTitle")
Case vbYes
Case vbNo
End Select
End Function