Access - que es lo que falla???

hola a todos

tengo un problema, y agradeceria vuestra humilde ayuda

tengo dos tablas, estan relacionadas por el campo Cod.

tabla1 campos ( Cod, Nombre, Origen )
tabla2 campos ( Cod, Nombre, Origen, Fecha_ent, Fecha_sal )
y una consulta de la tabla1

bien en un formulario creo la tabla1

en otro formulario creo la tabla2, donde ademas he puesto un combox donde el origen de los datos es la consulta de la tabla1 y asi cuando selecciono un codigo me pone automaticamente todos los datos de ese codigo, por ejemplo el codigo seleccionado, nombre, origen, y me ahorro tener que teclearlos, para solamente introducir las fechas, lo que quiero hacer es que al seleccionar un codigo en el combox si aun no tiene fecha asignada pues me salga los datos del codigo en cuestion y los campos de fecha vacios, y actualizarlos, pero si al seleccionar un codigo en el combox, ya le habia asignado con anterioridad fechas que me salga, el codigo seleccionado con todos los campos actualizados incluidos los de fechas, tengo este codigo peroa nada, nose que estoy haciendo mal o si no es asi, o lo mas seguro que me falta algo, en fin un millon de gracias.

Private Sub Comando18_Click()

' GRABA EL REGISTRO GUARDADO
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.GoToRecord , , acNewRec
End Sub

'Busca
Private Sub Cuadro_combinado16_AfterUpdate()
DoCmd.ShowAllRecords
Me.Cod.Value = Me.Cuadro_combinado16.Column(0)
Me.nombre.Value = Me.Cuadro_combinado16.Column(1)
Me.origen.Value = Me.Cuadro_combinado16.Column(2)
End Sub

Private Sub Form_Load()
DoCmd.ShowAllRecords
End Sub