NoData() still giving me an error.

[cowboy]

This is the code I have under NoData event on the report:



Private Sub Report_NoData(Cancel As Integer)
MsgBox "No records in current selection"
Cancel = True
End Sub

The picture I have attached is the error that comes up.
What am I doing wrong?

Thanks

[pbaldy]

Nothing in that code. You also have to trap for error 2501 in the code that opens the report.

[cowboy]

I tried a if error statement but it didnt catch it, anywhere I could read up on how to catch the error?

[pbaldy]

http://www.baldyweb.com/ErrorTrap.htm