N
Nylex
This is a function that I copied from a Downloaded Template and it works fine
Private Sub Report_Open(Cancel As Integer)
If Not IsLoaded("Purchase Orders") Then
MsgBox "Open this report using the Preview button on the Purchase
Orders form."
Cancel = True
End If
End Sub
I imported it into my Current Database and altered the form Name only
Private Sub Report_Open(Cancel As Integer)
If Not IsLoaded("Orders") Then
MsgBox "Open this report using the Preview button on the Orders form."
Cancel = True
End If
End Sub
When I open the Report I get the following message
Compile Error: Sub or Function not defined and it stops and highlight
“IsLoadedâ€
Don’t know where to look to fix the problem?
Private Sub Report_Open(Cancel As Integer)
If Not IsLoaded("Purchase Orders") Then
MsgBox "Open this report using the Preview button on the Purchase
Orders form."
Cancel = True
End If
End Sub
I imported it into my Current Database and altered the form Name only
Private Sub Report_Open(Cancel As Integer)
If Not IsLoaded("Orders") Then
MsgBox "Open this report using the Preview button on the Orders form."
Cancel = True
End If
End Sub
When I open the Report I get the following message
Compile Error: Sub or Function not defined and it stops and highlight
“IsLoadedâ€
Don’t know where to look to fix the problem?