Command button, must have data to continue?

K

Kerman SPI

I have a command button on my form"Incoming Notesheet". The button opens a
macro. 1st an update query "Insert date Issued" is run, 2nd a report opens
after the update query. I need a way to prevent the report "Summary" from
opening if data has not been entered in the update query (Left blank by
mistake). There must be some code to correct this. Here's my code for the
command button...Thanks...Randy


Private Sub PrintSummary_Click()
On Error GoTo Err_PrintSummary_Click

Dim stDocName As String

stDocName = "Summary and Date Issued Macro"
DoCmd.RunMacro stDocName

Exit_PrintSummary_Click:
Exit Sub

Err_PrintSummary_Click:
MsgBox Err.Description
Resume Exit_PrintSummary_Click

End Sub
 
Top