03/05/2006, 10:10
|
 | | | Fecha de Ingreso: noviembre-2003 Ubicación: Bizkaia
Mensajes: 1.315
Antigüedad: 21 años, 2 meses Puntos: 2 | |
| Al crear el desplegable, te saldrá un asistente, ahí te ofrece "buscar un registro en el formulario según el valor que he seleccionado en el cuadro combinado".
Si no, le pones "origen de la fila":
SELECT TU_TABLA.CAMPO_CLAVE, TU_TABLA.CAMPO_DEL_DESPLEGABLE FROM TU_TABLA;
aqui tienes el código: (botón derecho->propiedades)
En "después de actualizar" le das a "generador de código" y pones:
Private Sub NOMBRE_DEL_CUADRO_COMBINADO_AfterUpdate()
' Buscar el registro que coincida con el control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NOMBRE DEL CAMPO CLAVE] = " & Str(Nz(Me![NOMBRE DEL CUADRO COMBINADO], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub |