Extraer campo de consulta y copiarlo a una variable
Tengo una tabla con delegaciones y contacto correspondiente.
En un formulario, quiero extraer el contacto de una delegación específica que selecciono con un combobox y copiarla en el campo CONTACTO del mismo formulario. En la opción 'al actualizar' tengo el siguiente código, pero me sale error '3061' Se esperaba 2. Creo que el error esta en el where de la consulta, pero no se como indicarle al where que quiero que se fije en el campo COMBOBOX_DELEGACIÓN para que me saque la consulta que quiero.
Dim SQLContacto As String
Dim rscontacto As Recordset
Dim contactodel As String
Dim Dest As String
Dest = Me.Destino.Value
SQLContacto = "Select CONTACTO.DELEGACION from DELEGACIÓN where Nombre = Dest "
Set miBD = CurrentDb()
Set rscontacto = miBD.OpenRecordset(SQLContacto, dbOpenDynaset)
rscontacto.MoveFirst
contactodel = rscontacto!Contacto
Me.Contacto = contactodel