Combo Box event procedure... I can't get it to open form on click

[DebiV]

I want this to open the form for the selection on in the combo box... I have not programmed in Access for many years

Dim stDocName As String
stLinkCriteria = Me.Search_Location

stDocName = "frmLocationLookup"

DoCmd.OpenForm stDocName, acNormal = "[Tenant Name]=" & "'" & [Tenant Name] & "'", , Normal

 

[PHV]

When in the VBE, put the cursor inside the OpenForm word and press the F1 key.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[DebiV]

I got it to open the form but not to the specific records :-/

 

[dhookom]

Help has a fairly good description of the OpenForm method including the arguments/parameters and their order.

Duane
Hook'D on Access
MS Access MVP

 

[DebiV]

It is not opening to the specific record... it is opening the correct form.

DoCmd.OpenForm stDocName, acNormal, "Tenant Name= '" & Me.Search_Location & "', acFormEdit, acWindowNormal

 

[MajP]

As stated the help file shows
expression .OpenForm(FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs)

first parameter: form name
2nd: View
3rd: Name of Filter or query
4th: Where condition
5th: data mode
6th: Window mode
7th: OpenArg

DoCmd.OpenForm stDocName, acNormal, "Tenant Name= '" & Me.Search_Location & "', acFormEdit, acWindowNormal"

So your where statement should be your 4th parameter not the 3rd
DoCmd.OpenForm stDocName, acNormal, ,"Tenant Name= '" & Me.Search_Location & "', acFormEdit, acWindowNormal"

 

[dhookom]

I think MajP meant to move the last double quote further to the left:

DoCmd.OpenForm stDocName, acNormal, ,"Tenant Name= '" & Me.Search_Location & "'[COLOR=#A40000][highlight #FCE94F]"[/highlight][/color], acFormEdit, acWindowNormal

Duane
Hook'D on Access
MS Access MVP

 

[MajP]

No, I did not even notice that. What I noticed was that the where condition is in the 3rd argument which is the Filter paramter. It should be the 4th argument which is the WhereCondition. I added a comma after acnormal.

 

[DebiV]

thx... I forgot how sensitive Access fields are to using a space in the field name. the little things that make you go ... ugh!!