Private Sub subReservation_DblClick(Cancel As Integer)
On Error GoTo Err_subReservation_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "subReservation"
stLinkCriteria = "[Name] = '" & Me![Name] & "'
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_subReservation_DblClick:
Exit Sub
Err_subReservation_DblClick:
MsgBox Err.Description
Resume Exit_subReservation_DblClick
End Sub
so should this work?