Double Click Function

[njliven1]

I have a list form and want to be able to click on a single item and then open another form with the detail for that item in the list.



The code I am using is below. However I get a type mismatch error. The data type for the InvoiceNo fields do match, so I am confused as to why this is not work. Except for the fact that my fields are not integers they are text fields. Any help is appreciated. Thank you!

Private Sub InvoiceNo_DblClick(Cancel As Integer)


If IsNull(InvoiceNo) Then Exit Sub
DoCmd.OpenForm "frm_invoice_sub2", , , "InvoiceNo=" & InvoiceNo

End Sub

[Welshgasman]

For text fields surround with single quotes, unless value could have a single quote. I doubt an invoice number should?

[njliven1]

When I do that is opens the form, but it shows all the data in in the table, I just want the data associated with that InvoiceNo record.

[Welshgasman]

Make sure the where option is in the correct position?

https://docs.microsoft.com/en-us/off...docmd.openform

Post back what you have now

[njliven1]

Still not working. the first comma in the code is the view, second one is filter and third one is for the WhereCondition. There is no filter and the where condition is the InvoiceNo. So the second one represents a filter and it is optional, but I think it needs to be there, so the third position represents the WhereCondition. Taking away one of the commas did not make a difference. Maybe it is the way I have my quotes? Just at a loss.

Private Sub InvoiceNo_DblClick(Cancel As Integer)


If IsNull(InvoiceNo) Then Exit Sub
DoCmd.OpenForm "frm_invoice_sub2", , , "'InvoiceNo'=" & "'InvoiceNo'"

End Sub

[CJ_London]

For text you need

“InvoiceNo =‘“ & invoiceNo & “‘“

[isladogs]

DoCmd.OpenForm "frm_invoice_sub2", , , "InvoiceNo= & '"InvoiceNo"'"

EDIT: The above code is wrong. Corrected in post #10

[njliven1]

Thanks, it works now. Quotes get so confusing.

[CJ_London]

"InvoiceNo= & '"InvoiceNo"'"

sure about that Colin

[isladogs]

Oops
Reminds me of the comment by Eric Morecambe about playing all the right notes but not necessarily in the right order.
Here I applied that to the quotes
Try again....

DoCmd.OpenForm "frm_invoice_sub2", , , "InvoiceNo='" & InvoiceNo & "'"

Presumably the OP used your version (but with standard quote marks!)