Actualicy a Query

[tzhgare1]

I had Creat a query


Set qd = db.CreateQueryDef("Abfrage1", "SELECT [A_Tarif_KK].[Nachname], [A_Tarif_KK].[KKName], [A_Tarif_KK].[Positionsnummer] FROM [A_Tarif_KK] WHERE Nachname LIKE '" & Me.Nachname & "*'")

How i can update this query? Change the Nachname
Field Nachname = Family name

Thanks

[June7]

Why are you using code to create query?

You want a dynamic parameter for the filter criteria? This is basic Access functionality. Open query in design view and edit.

Options:

1. popup parameter input

SELECT [A_Tarif_KK].[Nachname], [A_Tarif_KK].[KKName], [A_Tarif_KK].[Positionsnummer] FROM [A_Tarif_KK] WHERE Nachname LIKE '" & [Enter family name] & "*'")

2. reference to a control on a form

SELECT [A_Tarif_KK].[Nachname], [A_Tarif_KK].[KKName], [A_Tarif_KK].[Positionsnummer] FROM [A_Tarif_KK] WHERE Nachname LIKE '" & Forms!formname!contralname & "*'")

[tzhgare1]

Thanks for your Input.
I was meaning with the query is easyer.
I will try with your solution.