Hi Folks
Any ideas on why the following code does not open a pop form with information linked to the SERIES field in my table? The data is a number (but could be text) and formatted as '0000' The numbers are not distinct (several numbers repeat many times) and I simply want to double click a control a form and have open another form with appropriate data.
Thanks for your help.
Private Sub SERIES_DblClick(Cancel As Integer)
On Error GoTo Err_SERIES_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmSERIES DEFINITIONS"
stLinkCriteria = "[SERIES]=" & "'" & Me![SERIES] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_SERIES_DblClick:
Exit Sub
Err_SERIES_DblClick:
MsgBox Err.Description
Resume Exit_SERIES_DblClick
End Sub
Any ideas on why the following code does not open a pop form with information linked to the SERIES field in my table? The data is a number (but could be text) and formatted as '0000' The numbers are not distinct (several numbers repeat many times) and I simply want to double click a control a form and have open another form with appropriate data.
Thanks for your help.
Private Sub SERIES_DblClick(Cancel As Integer)
On Error GoTo Err_SERIES_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmSERIES DEFINITIONS"
stLinkCriteria = "[SERIES]=" & "'" & Me![SERIES] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_SERIES_DblClick:
Exit Sub
Err_SERIES_DblClick:
MsgBox Err.Description
Resume Exit_SERIES_DblClick
End Sub