Help with Report - On Open Event Procedure

P

Playa

I want to display a message box if there are no records in a report when it
is opened. I am not really sure how to code this, here is the code I am
using but it doesn't work.

Private Sub Report_Open(Cancel As Integer)
If IsNull(Me.MachineNum) Then
MsgBox "There is no Revision History for this Machine Number"
End If
End Sub

Any one know how I can check to see if there are any records and if not,
display a message box?

Thanks in Advance
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBA Coding Help for Beginner 0
Access2007 won't run report event procedures (e.g. Detail Format) 2
Closing PDF file from Excel VBA (Adobe Reader, Adobe Acrobat, Browser) 0
Detail_Format works in Print Preview but Not When Printing 0
Main Report without Data 1
Report skips through form with parameters 7
Change Report Title Based on Source & Date? 0
On Open Event Procedure Help For a Report 1

Top