D
Doug Weller
This used to work fine:
Private Sub Command24_Click()
On Error GoTo Err_Command24_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Proforma Request"
stLinkCriteria = "[Proforma Number]=" & Me![Proforma Number]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command24_Click:
Exit Sub
Err_Command24_Click:
MsgBox Err.Description
Resume Exit_Command24_Click
End Sub
But now I get the error message "OpenForm action was cancelled"
I'm guessing that perhaps someone made changes in 'Proforma Request',
but if so what changes would affect this action?
Thanks.
Doug
Private Sub Command24_Click()
On Error GoTo Err_Command24_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Proforma Request"
stLinkCriteria = "[Proforma Number]=" & Me![Proforma Number]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command24_Click:
Exit Sub
Err_Command24_Click:
MsgBox Err.Description
Resume Exit_Command24_Click
End Sub
But now I get the error message "OpenForm action was cancelled"
I'm guessing that perhaps someone made changes in 'Proforma Request',
but if so what changes would affect this action?
Thanks.
Doug