After Update event asking for paramater value

[Sandra Walsh]

I have a form called f_Dashboard which has the following code on the AfterUpdate() event of an unbound field called SelectCityAllTrips. This code opens a filtered set of records in f_MainTripForm based on the value that the user enters in the SelectCityAllTrips field.

Private Sub SelectCityAllTrips_AfterUpdate()
DoCmd.OpenForm "f_MainTripForm", , , "City = " & SelectCityAllTrips.value
DoCmd.Close acForm, "f_Dashboard"
End Sub

When the code runs, it opens an input form asking the user to enter a parameter value. See image

When you re-type the value here again, f_MainTripForm opens up with the correct records.

I am trying to bypass the parameter request and open the form directly.

I have several other unbound fields that work with similar code but they don't ask for a parameter value to be re-entered. The only difference is that the other fields use numberic values and this is a text field.

Any help appreciated.
Sandra

[Rabbit]

That's because string values need to be enclosed in quotes.

WHERE city = 'Chicago'
WHERE city = Chicago

The first one if what you need. The second one is what you have.

[Sandra Walsh]

Thanks for the clue!

Here is the updated code:

Private Sub SelectCityAllTrips_AfterUpdate()
 
DoCmd.OpenForm "f_MainTripForm", , , "City = " & "'" & SelectCityAllTrips.value & "'"
DoCmd.Close acForm, "f_Dashboard"
End Sub
 

Much appreciated!

[NeoPa]

Indeed. See Quotes (') and Double-Quotes (") - Where and When to use them.

Also, you don't need to concatenate (&) two separate literal strings on a single line. "City = " & "'" is no different from "City = '". Your code could be :

DoCmd.OpenForm "f_MainTripForm", , , "[City] = '" & SelectCityAllTrips & "'"