Access - Actualizar datos despues de consultas datos añadidos

Tengo un problema que consiste en que tengo una introducción de asientos contables que numero con este código:
Private Sub Form_Current()
If Me.NewRecord Then
Me.asiento = Nz(DMax("asiento", "contamovimientos"), 0) + 1
End If
End Sub

Ahora desde los datos de una factura "Base" "IVA" "Total", agrego los datos a la tabla "contamovimientos, pero no se como actualizar el número de asiento, los campos de dicha tabla son:
id: autonumérico
Asiento: numérico admite duplicados
cuenta: texto
d: moneda
h: moneda.
Con tres consultas de datos anexados creo el asiento
CuentaCliente: d
CuentaIVA h
cuentaVentas h
pero asiento se me queda vacio

Gracias

Una consulta de datos anexados crea nuevos registros, tres por asiento crearían tres nuevos registros (cada uno con valor en un campo, se supone) y además (y de propina) otro asiento para el valor calculado (este con el valor en su campo 'asiento') .... algo no concuerda.

Si la teoría consiste en utilizar un formulario, es a el al que habrá que dar valor en cada uno de sus campos (al igual que se hace con el campo 'asiento'), que los valores se obtengan de un modo u otro ... ya depende de la metodología que se utilice, al guardar el registro (con cualquiera de los métodos que se pueden utilizar con un formulario) aparecerá con 'todos' esos valores (el calculado para 'asiento' también).

Otro supuesto consistiría en crear el registro con el valor calculado, GUARDARLO (para que 'exista', si no se guarda es un proyecto por finalizar) y a ese registro que solo tiene el valor calculado en el campo 'asiento', con consultas DE ACTUALIZACION se le asignan valores al resto de los campos.

Hola!

Impecable la explicación de Emilio. Poco más hay que añadir.

Sólo por aportar alguna idea más, podrías intentar guardar el registro ANTES de lanzar las consultas, simplemente haciendo un

docmd.runcommand accmdsaverecord

A ver si la ausencia del número de asiento te viniera por ahí.

Un saludo,

Neckkito

Al final lo socioné con esta consulta de actualización al final

Saludos.

Salva

• ActualizaNumeracion.rar(180,9 KB)