Hi, I am trying to load a form to display specific data from a combo list box. It loads the form but not displaying the data. The code I am using is:



Private Sub Command4_Click()
On Error GoTo Err_Command4_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Main Details"

stLinkCriteria = "[Last Name]=" & "'" & Me![Combo0] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command4_Click:
Exit Sub

Err_Command4_Click:
MsgBox Err.Description
Resume Exit_Command4_Click

End Sub



Any help is appreciated.

Try this:
stLinkCriteria = "[Last Name]='" & Me![Combo0] & "'"

Just tried it and it does the same as the code I am using by loading the form but without the data lookup

Its possible that your combo box has a first, hidden column and your link is referring to that column. Have a look at this link Columns problem You might try this also:


Dim stLinkCriteria As String
Dim strLastName as String
stDocName = "Main Details"

strLastName = Me.Combo0.Column(1) 'IF it is Column 1....column count starts at 0



stLinkCriteria = "[Last Name]=" & strLastName

DoCmd.OpenForm stDocName, , , stLinkCriteria





HTH


Z

Send a short example of your MDB, (Access 2000 or 2002-2003).